Bug fix: When viewing stored S3 site with a non-default hostname, the default Amazon S3 hostname was shown instead

Source commit: d5589fde339360e9a34899830e8619d6d37be23a

source/forms/Login.cpp

@@ -488,7 +488,6 @@ void __fastcall TLoginDialog::LoadSession(TSessionData * SessionData)
   {
     UserNameEdit->Text = SessionData->UserName;
     PortNumberEdit->AsInteger = SessionData->PortNumber;
-    HostNameEdit->Text = SessionData->HostName;
 
     bool Editable = IsEditable();
     if (Editable)
@@ -512,6 +511,9 @@ void __fastcall TLoginDialog::LoadSession(TSessionData * SessionData)
     TransferProtocolCombo->ItemIndex = FSProtocolToIndex(SessionData->FSProtocol, AllowScpFallback);
     TransferProtocolView->Text = TransferProtocolCombo->Text;
 
+    // Only after loading TransferProtocolCombo, so that we do not overwrite it with default S3 hostname
+    HostNameEdit->Text = SessionData->HostName;
+
     NoteGroup->Visible = !Trim(SessionData->Note).IsEmpty();
     NoteMemo->Lines->Text = SessionData->Note;