diff options
| -rw-r--r-- | src/gui/gui_form.pas | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/src/gui/gui_form.pas b/src/gui/gui_form.pas index f5680e25..5907a83e 100644 --- a/src/gui/gui_form.pas +++ b/src/gui/gui_form.pas @@ -334,8 +334,6 @@ end; procedure TfpgForm.Hide; begin - if (fpgApplication.TopModalForm = self) then - fpgApplication.PopModalForm; HandleHide; if ModalResult = 0 then ModalResult := -1; |