Mercurial > emacs

changeset 40361:8c6df631e62d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(ange-ftp-send-cmd): Call fix-name-func for `mdtm'. From "Forrest Cahoon" <forrest.cahoon@merrillcorp.com>.
author Gerd Moellmann <gerd@gnu.org>
date Sat, 27 Oct 2001 07:51:38 +0000
parents 04be247dd745
children a4a678880dfc
files lisp/net/ange-ftp.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/net/ange-ftp.el	Sat Oct 27 07:42:11 2001 +0000
+++ b/lisp/net/ange-ftp.el	Sat Oct 27 07:51:38 2001 +0000
@@ -2245,9 +2245,9 @@
       (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)