mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-09-28 11:17:46 +00:00
Fix ESC deleting the current selection.
This commit is contained in:
parent
96f450e2ff
commit
261d6fc97d
1 changed files with 2 additions and 2 deletions
|
@ -3173,6 +3173,8 @@ DO
|
|||
END IF
|
||||
END IF
|
||||
|
||||
IF K$ = CHR$(27) AND NOT AltSpecial THEN GOTO specialchar 'Steve edit 07-04-2014 to stop ESC from printing chr$(27) in the IDE
|
||||
|
||||
'standard character
|
||||
IF ideselect THEN GOSUB delselect
|
||||
idechangemade = 1
|
||||
|
@ -3195,8 +3197,6 @@ DO
|
|||
a$ = idegetline(idecy)
|
||||
IF LEN(a$) < idecx - 1 THEN a$ = a$ + SPACE$(idecx - 1 - LEN(a$))
|
||||
|
||||
IF K$ = CHR$(27) AND NOT AltSpecial THEN GOTO specialchar 'Steve edit 07-04-2014 to stop ESC from printing chr$(27) in the IDE
|
||||
|
||||
IF ideinsert THEN
|
||||
a2$ = RIGHT$(a$, LEN(a$) - idecx + 1)
|
||||
IF LEN(a2$) THEN a2$ = RIGHT$(a$, LEN(a$) - idecx)
|
||||
|
|
Loading…
Reference in a new issue