diff --git a/ide/text/fpdebug.pas b/ide/text/fpdebug.pas
index c221a7f08d..5db952970c 100644
--- a/ide/text/fpdebug.pas
+++ b/ide/text/fpdebug.pas
@@ -3029,7 +3029,8 @@ end;
 procedure DoneDebugger;
 begin
 {$ifdef DEBUG}
-  PushStatus('Closing debugger');
+  { PushStatus('Closing debugger');
+    No its called after App.Done !! }
 {$endif}
   if assigned(Debugger) then
    dispose(Debugger,Done);
@@ -3038,7 +3039,7 @@ begin
   If Use_gdb_file then
     Close(GDB_file);
   Use_gdb_file:=false;
-  PopStatus;
+  {PopStatus;}
 {$endif DEBUG}
   {DoneGDBWindow;}
 end;
@@ -3144,7 +3145,10 @@ end.
 
 {
   $Log$
-  Revision 1.48  2000-02-04 14:34:46  pierre
+  Revision 1.49  2000-02-04 23:18:05  pierre
+   * no pushstatus in DoneDebugger because its called after App.done
+
+  Revision 1.48  2000/02/04 14:34:46  pierre
   readme.txt
 
   Revision 1.47  2000/02/04 00:10:58  pierre