From a580043f9cc5ce71a7850366ecb2a3700e4a538e Mon Sep 17 00:00:00 2001
From: Ansgar Becker <ansgarbecker@users.noreply.github.com>
Date: Fri, 11 Jan 2008 20:05:51 +0000
Subject: [PATCH] Fix bug #1865305 "error popups with server down and process
 list reloads"

---
 source/childwin.pas | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/source/childwin.pas b/source/childwin.pas
index ede97443..c5af1e89 100644
--- a/source/childwin.pas
+++ b/source/childwin.pas
@@ -5322,6 +5322,9 @@ begin
       CheckConnection;
     except
       on E: Exception do begin
+        // Ensure auto-updating processlist is disabled, see bug #1865305
+        DisableAutoRefreshClick(self);
+        Screen.Cursor := crDefault;
         raise Exception.Create('Failed to reconnect, giving up. (' + E.Message + ')');
       end;
     end;