summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--docview/src/frm_main.pas2
1 files changed, 1 insertions, 1 deletions
diff --git a/docview/src/frm_main.pas b/docview/src/frm_main.pas
index 00a192ea..a74b4027 100644
--- a/docview/src/frm_main.pas
+++ b/docview/src/frm_main.pas
@@ -306,7 +306,7 @@ const
procedure TMainForm.MainFormException(Sender: TObject; E: Exception);
begin
- TfpgMessageDialog.Critical('An unexpected error occurred.', E.Message);
+ fpgApplication.ShowException(E);
end;
procedure TMainForm.lbIndexKeyPress(Sender: TObject; var KeyCode: word;