summaryrefslogtreecommitdiff
path: root/UConnectionManager.pas
diff options
context:
space:
mode:
Diffstat (limited to 'UConnectionManager.pas')
-rw-r--r--UConnectionManager.pas4
1 files changed, 2 insertions, 2 deletions
diff --git a/UConnectionManager.pas b/UConnectionManager.pas
index dc97e20..90db1e7 100644
--- a/UConnectionManager.pas
+++ b/UConnectionManager.pas
@@ -343,7 +343,7 @@ begin
DoConnect;
end;
-procedure vfs_ask_question_callback(const AMessage: PChar; const Choices: PPChar; choice: PInteger; user_data: Pointer); cdecl;
+procedure vfs_ask_question_callback(const AMessage: PChar; const Choices: PPChar; choice: PInteger; cancel_choice: Integer; user_data: Pointer); cdecl;
var ConnMgr: TFConnectionManager;
DialogParent: PGtkWidget;
begin
@@ -356,7 +356,7 @@ begin
end;
HandleVFSAskQuestionCallback(DialogParent, AMessage, Choices, choice);
if ConnMgr is TFConnectionManager then begin
- if choice <> nil then ConnMgr.FSilenceError := choice^ < 0;
+ if choice <> nil then ConnMgr.FSilenceError := (choice^ < 0) or (choice^ = cancel_choice);
end;
end;