diff --git a/source/ide/ide_methods.bas b/source/ide/ide_methods.bas
index fcdbab8f5..d23e41c1d 100644
--- a/source/ide/ide_methods.bas
+++ b/source/ide/ide_methods.bas
@@ -3426,6 +3426,7 @@ DO
             KB = KEY_ESC 'exit menu selection
         END IF
 
+        IF _EXIT THEN ideexit = 1: KB = KEY_ESC
     LOOP UNTIL KB
 
     K$ = UCASE$(K$)