From c977b8dd20d6f606f692efcd72e916fc020138f3 Mon Sep 17 00:00:00 2001 From: Tomas Bzatek Date: Wed, 3 Sep 2008 15:16:10 +0200 Subject: Retain list selection in Connection Manager Read/write connections on demand only --- UMain.pas | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) (limited to 'UMain.pas') diff --git a/UMain.pas b/UMain.pas index 2696263..f548a6d 100644 --- a/UMain.pas +++ b/UMain.pas @@ -4601,10 +4601,10 @@ begin ReadBookmarks; RefreshBookmarksMenu; end; - if ChangedConnMgr then begin +(* if ChangedConnMgr then begin DebugMsg(['Connection manager file changed ---> performing refresh']); ReadConnections; - end; + end; *) try InternalLock; if (ChangedMainGUI or ChangedAssoc or ChangedMounter) and (Application.MessageBox(LANGSomeOtherInstanceChanged, @@ -5890,8 +5890,10 @@ begin FConnectionManager := TFConnectionManager.Create(Self); b := FConnectionManager.Run = mbOK; - if FConnectionManager.ListView.Selected <> nil - then ConnInfo := FConnectionManager.ListView.Selected.AsPointer(0); + if FConnectionManager.ListView.Selected <> nil then begin + ConnInfo := FConnectionManager.ListView.Selected.AsPointer(0); + ConfConnMgrActiveItem := FConnectionManager.ListView.Selected.Index; + end; WriteConnections; // Save the list to the file if b then begin -- cgit v1.2.3