From: Gerd Moellmann <gerd@gnu.org>
Date: Fri, 28 Jan 2000 17:29:47 +0000 (+0000)
Subject: (ange-ftp-copy-file-internal): Quote new name
X-Git-Tag: emacs-pretest-21.0.90~5217
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=850e3ba089fd970aa90d679d9458e65d11b9b716;p=emacs.git

(ange-ftp-copy-file-internal): Quote new name
for the case it contains spaces.
---

diff --git a/lisp/ange-ftp.el b/lisp/ange-ftp.el
index d9af92f83ea..6c822d4604a 100644
--- a/lisp/ange-ftp.el
+++ b/lisp/ange-ftp.el
@@ -3501,7 +3501,7 @@ system TYPE.")
 	      (ange-ftp-send-cmd
 	       f-host
 	       f-user
-	       (list 'get f-name (or temp1 newname))
+	       (list 'get f-name (or temp1 (ange-ftp-quote-string newname)))
 	       (or msg
 		   (if (and temp1 t-parsed)
 		       (format "Getting %s" f-abbr)