summaryrefslogtreecommitdiff
path: root/src/gui
diff options
context:
space:
mode:
Diffstat (limited to 'src/gui')
-rw-r--r--src/gui/fpg_dialogs.pas2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/gui/fpg_dialogs.pas b/src/gui/fpg_dialogs.pas
index 0a8d7cfc..62198263 100644
--- a/src/gui/fpg_dialogs.pas
+++ b/src/gui/fpg_dialogs.pas
@@ -546,7 +546,7 @@ end;
procedure TfpgBaseDialog.btnCancelClick(Sender: TObject);
begin
ModalResult := mrCancel;
- Close;
+ Close; // this shouldn't really be needed if we displayed form with ShowModal
end;
procedure TfpgBaseDialog.HandleKeyPress(var keycode: word;