Allow ESC to dismiss the "Are you sure you want to clear..." dialog.

2024-07-05 12:20:22 +00:00 · 2016-01-13 20:08:03 -02:00 · 2016-01-13 20:08:03 -02:00 · 2f2e93a276
parent 9cbcd52968
commit 2f2e93a276
1 changed files with 5 additions and 0 deletions
--- a/source/ide/ide_methods.bas
+++ b/source/ide/ide_methods.bas
@ -6725,6 +6725,11 @@ DO 'main loop
        EXIT FUNCTION
    END IF

+    IF K$ = CHR$(27) THEN
+        ideclearhistory$ = "N"
+        EXIT FUNCTION
+    END IF
+
    'end of custom controls
    mousedown = 0
    mouseup = 0