From e9ee189fec3bfa29cc8d8a14a42d9eab852919e2 Mon Sep 17 00:00:00 2001
From: rswindell <>
Date: Mon, 16 Apr 2001 23:59:10 +0000
Subject: [PATCH] Added 15 second time-out to CloseQuery event handler.

---
 src/sbbs3/ctrl/MainFormUnit.cpp | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/src/sbbs3/ctrl/MainFormUnit.cpp b/src/sbbs3/ctrl/MainFormUnit.cpp
index 92405b82d0..3ed714e23d 100644
--- a/src/sbbs3/ctrl/MainFormUnit.cpp
+++ b/src/sbbs3/ctrl/MainFormUnit.cpp
@@ -828,7 +828,10 @@ void __fastcall TMainForm::FormCloseQuery(TObject *Sender, bool &CanClose)
         FtpStopExecute(Sender);
     }
 
+    time_t start=time(NULL);
 	while(TelnetStop->Enabled || MailStop->Enabled || FtpStop->Enabled) {
+        if(time(NULL)-start>15)
+            break;
         Application->ProcessMessages();
         Sleep(1);
     }
-- 
GitLab