summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorMichael Albinus <michael.albinus@gmx.de>2008-02-13 17:20:11 +0000
committerMichael Albinus <michael.albinus@gmx.de>2008-02-13 17:20:11 +0000
commitde95cc30ec71235a682f16b7356569620fe947b9 (patch)
tree58abf702bd40a5393451cd7c689fde5c8d804fd9 /lisp
parent4c9702c3e88137e8e0b51964b4ab5f8de5ff0814 (diff)
downloademacs-de95cc30ec71235a682f16b7356569620fe947b9.tar.gz
* net/ange-ftp.el (ange-ftp-cf1): Quote FILENAME.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog4
-rw-r--r--lisp/net/ange-ftp.el2
2 files changed, 5 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index dc940e64ab9..87141d02ed2 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2008-02-13 Michael Albinus <michael.albinus@gmx.de>
+
+ * net/ange-ftp.el (ange-ftp-cf1): Quote FILENAME.
+
2008-02-12 Juri Linkov <juri@jurta.org>
* startup.el (fancy-startup-screen, normal-splash-screen):
diff --git a/lisp/net/ange-ftp.el b/lisp/net/ange-ftp.el
index d53f740296a..d4816dbe1c8 100644
--- a/lisp/net/ange-ftp.el
+++ b/lisp/net/ange-ftp.el
@@ -3766,7 +3766,7 @@ Value is (0 0) if the modification time cannot be determined."
(ange-ftp-send-cmd
t-host
t-user
- (list 'put (or temp2 filename) t-name)
+ (list 'put (or temp2 (ange-ftp-quote-string filename)) t-name)
(or msg
(if (and temp2 f-parsed)
(format "Putting %s" newname)