diff options
Diffstat (limited to 'UMain.pas')
| -rw-r--r-- | UMain.pas | 5 |
1 files changed, 5 insertions, 0 deletions
@@ -6066,6 +6066,7 @@ var Buttons: TMessageButtons; AFConnectionProperties: TFConnectionProperties; URI: string; ConnMgrItem: TConnMgrItem; + i: integer; begin Result := True; URI := Engine.GetPathURI; @@ -6081,6 +6082,10 @@ begin AFConnectionProperties := TFConnectionProperties.Create(Self); try AFConnectionProperties.URIEntry.Text := URI; + if (Engine.CustomPluginIDSave <> '') and (AFConnectionProperties.PluginOptionMenu.Items.Count > 0) then + for i := 0 to PluginList.Count - 1 do + if TVFSPlugin(PluginList[i]).VFSName = Engine.CustomPluginIDSave + then AFConnectionProperties.PluginOptionMenu.ItemIndex := i + 1; if AFConnectionProperties.Run = mbOK then begin ReadConnections; ConnMgrItem := TConnMgrItem.Create; |
