From 58d27164ab246e33ef6397723679224074307c45 Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Sat, 27 Oct 2001 07:54:14 +0000 Subject: [PATCH] (ange-ftp-send-cmd): Call fix-name-func for `mdtm'. From "Forrest Cahoon" . --- lisp/net/ange-ftp.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/net/ange-ftp.el b/lisp/net/ange-ftp.el index b167879db1e..68886e80cb1 100644 --- a/lisp/net/ange-ftp.el +++ b/lisp/net/ange-ftp.el @@ -2245,9 +2245,9 @@ and NOWAIT." (setq cmd1 (funcall fix-name-func cmd1))) ;; Second argument is the remote name - ((memq cmd0 '(append put chmod)) + ((or (memq cmd0 '(append put chmod)) + (and (eq cmd0 'quote) (string= cmd1 "mdtm"))) (setq cmd2 (funcall fix-name-func cmd2))) - ;; Both arguments are remote names ((eq cmd0 'rename) (setq cmd1 (funcall fix-name-func cmd1) -- 2.39.2