mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-09-28 11:17:46 +00:00
Show eventual substitutions even if Find and Replace is canceled.
This commit is contained in:
parent
f657fb24d9
commit
7916be2e3e
2 changed files with 10 additions and 2 deletions
|
@ -5478,7 +5478,15 @@ FUNCTION ide2 (ignore)
|
|||
idedeltxt
|
||||
PCOPY 3, 0: SCREEN , , 3, 0: idewait4mous: idewait4alt
|
||||
ideselect = 0
|
||||
IF r$ = "C" THEN idecx = oldcx: idecy = oldcy: GOTO ideloop
|
||||
IF r$ = "C" THEN
|
||||
idecx = oldcx: idecy = oldcy: GOTO ideloop
|
||||
IF changed THEN
|
||||
ideshowtext
|
||||
SCREEN , , 0, 0: LOCATE , , 1: SCREEN , , 3, 0
|
||||
PCOPY 3, 0
|
||||
idechanged changed
|
||||
END IF
|
||||
END IF
|
||||
IF r$ = "Y" THEN
|
||||
l$ = idegetline(idecy)
|
||||
idechangemade = 1
|
||||
|
|
|
@ -12511,7 +12511,7 @@ IF Debug THEN PRINT #9, "ERL="; ERL
|
|||
IF idemode AND qberrorhappenedvalue >= 0 THEN
|
||||
'real qb error occurred
|
||||
ideerrorline = linenumber
|
||||
idemessage$ = "Compiler error (check for syntax errors) (" _ERRORMESSAGE$ + ":"
|
||||
idemessage$ = "Compiler error (check for syntax errors) (" + _ERRORMESSAGE$ + ":"
|
||||
IF ERR THEN idemessage$ = idemessage$ + str2$(ERR) + "-"
|
||||
IF _ERRORLINE THEN idemessage$ = idemessage$ + str2$(_ERRORLINE)
|
||||
IF _INCLERRORLINE THEN idemessage$ = idemessage$ + "-" + _INCLERRORFILE$ + "-" + str2$(_INCLERRORLINE)
|
||||
|
|
Loading…
Reference in a new issue