diff --git a/harbour/source/debug/debugger.prg b/harbour/source/debug/debugger.prg
index 46191d5ec7..e3873e1860 100644
--- a/harbour/source/debug/debugger.prg
+++ b/harbour/source/debug/debugger.prg
@@ -132,6 +132,7 @@ METHOD HandleEvent() CLASS TDebugger
               RestScreen( 0, 0, MaxRow(), MaxCol(), ::cAppImage )
               SetPos( ::nAppRow, ::nAppCol )
               SetColor( ::cAppColors )
+              SetCursor( ::nAppCursor )
               oDebugger := nil
               lExit := .T.
               ::Exit()