mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-11-13 21:49:34 +01:00
* avoid a crash with fvision
This commit is contained in:
parent
b5f911268b
commit
c1c701655d
@ -452,7 +452,7 @@ begin
|
|||||||
nil))))))))),
|
nil))))))))),
|
||||||
nil)))))))))))));
|
nil)))))))))))));
|
||||||
DisableCommands(EditorCmds+SourceCmds+CompileCmds);
|
DisableCommands(EditorCmds+SourceCmds+CompileCmds);
|
||||||
Update;
|
// Update; Desktop is still nil at that point ...
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TIDEApp.InitStatusLine;
|
procedure TIDEApp.InitStatusLine;
|
||||||
@ -1216,7 +1216,10 @@ end;
|
|||||||
END.
|
END.
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.16 2002-08-13 08:59:12 pierre
|
Revision 1.17 2002-08-26 13:02:15 pierre
|
||||||
|
* avoid a crash with fvision
|
||||||
|
|
||||||
|
Revision 1.16 2002/08/13 08:59:12 pierre
|
||||||
+ Run menu changes depending on wether the debuggee is running or not
|
+ Run menu changes depending on wether the debuggee is running or not
|
||||||
|
|
||||||
Revision 1.15 2002/07/12 14:17:39 pierre
|
Revision 1.15 2002/07/12 14:17:39 pierre
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user