From 9092175cc9d76f2cb8a3589ca8c9e4fd4f9c13f1 Mon Sep 17 00:00:00 2001
From: Ansgar Becker <ansgarbecker@users.noreply.github.com>
Date: Tue, 10 Nov 2009 22:56:36 +0000
Subject: [PATCH] Try to fix a "unknown error" when canceling the session
 manager. Hopefully fixes issue #1450.

---
 source/main.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/source/main.pas b/source/main.pas
index 5e769431..fbd5cb01 100644
--- a/source/main.pas
+++ b/source/main.pas
@@ -1508,8 +1508,8 @@ begin
     if not Assigned(SessionManager) then
       SessionManager := TConnForm.Create(Self);
     if SessionManager.ShowModal = mrCancel then begin
-      Close;
-      Halt;
+      Free;
+      Exit;
     end;
   end;