From: Christophe Deleuze <christophe.deleuze@free.fr>
Date: Mon, 18 Dec 2023 10:13:30 +0000 (+0100)
Subject: Fix passive mode for tnftp client in ange-ftp.el.
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=03625c2fefa;p=emacs.git

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
---

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."
       proc)))
 
 (defun ange-ftp-passive-mode (proc on-or-off)
-  (if (string-match (concat "Passive mode " on-or-off)
+  (if (string-match (concat "Passive mode:? " on-or-off)
                     (cdr (ange-ftp-raw-send-cmd
                           proc (concat "passive " on-or-off)
                           "Trying passive mode..." nil)))