diff options
Diffstat (limited to 'UMain.pas')
| -rw-r--r-- | UMain.pas | 6 |
1 files changed, 6 insertions, 0 deletions
@@ -1112,6 +1112,8 @@ begin end; end; + ApplicationShuttingDown := True; // Avoid emitting config files refresh event + // Close all active connections if b then begin if (not LeftPanelNotebook.Visible) and (LeftPanelEngine is TVFSEngine) then CloseVFS(True, True) @@ -4591,6 +4593,10 @@ var ChangedMainGUI, ChangedAssoc, ChangedBookmarks, ChangedMounter, ChangedConnM begin try if (csDestroying in ComponentState) or (not Assigned(FMain)) then Exit; + if ApplicationShuttingDown then begin + DebugMsg([' *** TFMain.HandleFormFocusIn called when ApplicationShuttingDown, possible bug caught ***']); + Exit; + end; if InternalLockUnlocked then begin APerformRefresh := ConfFocusRefresh; |
