summaryrefslogtreecommitdiff
path: root/src/gui
diff options
context:
space:
mode:
Diffstat (limited to 'src/gui')
-rw-r--r--src/gui/gui_form.pas2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/gui/gui_form.pas b/src/gui/gui_form.pas
index 5b5ca64c..bf2ae6bc 100644
--- a/src/gui/gui_form.pas
+++ b/src/gui/gui_form.pas
@@ -318,8 +318,8 @@ end;
procedure TfpgForm.Close;
begin
- fpgApplication.RemoveComponent(self);
Hide;
+ fpgApplication.RemoveComponent(self);
if fpgApplication.MainForm = self then
fpgApplication.Terminated := True;
end;