diff --git a/harbour/source/debug/debugger.prg b/harbour/source/debug/debugger.prg
index e620bd3de0..ef74f5750b 100644
--- a/harbour/source/debug/debugger.prg
+++ b/harbour/source/debug/debugger.prg
@@ -1317,7 +1317,7 @@ METHOD HandleEvent() CLASS HBDebugger
                      ::aWindows[ n ]:Show( .T. )
                   ENDIF
                   ::aWindows[ n ]:LDblClick( nMRow, nMCol )
-                  exit
+                  EXIT
                ENDIF
             NEXT
          ENDIF
@@ -1348,7 +1348,7 @@ METHOD HandleEvent() CLASS HBDebugger
                      ::aWindows[ n ]:Show( .T. )
                   ENDIF
                   ::aWindows[ n ]:LButtonDown( nMRow, nMCol )
-                  exit
+                  EXIT
                ENDIF
             NEXT
          ENDIF