diff options
| author | Christophe Deleuze | 2023-12-18 11:13:30 +0100 |
|---|---|---|
| committer | Michael Albinus | 2023-12-18 11:13:30 +0100 |
| commit | 03625c2fefa682f74775abc1e223e17557d58bc7 (patch) | |
| tree | 09893637bc6cdb59ca54c7f2823a37f1dc143603 /lisp | |
| parent | b6429b1c1c781655efc761e237a7ae0aa6a0d344 (diff) | |
| download | emacs-03625c2fefa682f74775abc1e223e17557d58bc7.tar.gz emacs-03625c2fefa682f74775abc1e223e17557d58bc7.zip | |
Fix passive mode for tnftp client in ange-ftp.el.
* lisp/net/ange-ftp.el (ange-ftp-passive-mode): Fix passive mode
result string for tnftp client. (Bug#67865)
Copyright-paperwork-exempt: yes
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/net/ange-ftp.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/net/ange-ftp.el b/lisp/net/ange-ftp.el index 4bf87c14f31..b8e8c3f0c33 100644 --- a/lisp/net/ange-ftp.el +++ b/lisp/net/ange-ftp.el | |||
| @@ -2164,7 +2164,7 @@ Create a new process if needed." | |||
| 2164 | proc))) | 2164 | proc))) |
| 2165 | 2165 | ||
| 2166 | (defun ange-ftp-passive-mode (proc on-or-off) | 2166 | (defun ange-ftp-passive-mode (proc on-or-off) |
| 2167 | (if (string-match (concat "Passive mode " on-or-off) | 2167 | (if (string-match (concat "Passive mode:? " on-or-off) |
| 2168 | (cdr (ange-ftp-raw-send-cmd | 2168 | (cdr (ange-ftp-raw-send-cmd |
| 2169 | proc (concat "passive " on-or-off) | 2169 | proc (concat "passive " on-or-off) |
| 2170 | "Trying passive mode..." nil))) | 2170 | "Trying passive mode..." nil))) |