Mercurial > emacs

changeset 26208:41fc37a93f9e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(ange-ftp-insert-file-contents): Don't change last-coding-system-used by the call of ange-ftp-set-ascii-mode.
author Kenichi Handa <handa@m17n.org>
date Wed, 27 Oct 1999 04:55:52 +0000
parents 6526ea25c4dd
children 5ccc37bcd99c
files lisp/ange-ftp.el
diffstat 1 files changed, 4 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ange-ftp.el	Tue Oct 26 23:28:36 1999 +0000
+++ b/lisp/ange-ftp.el	Wed Oct 27 04:55:52 1999 +0000
@@ -3217,7 +3217,10 @@
 				  "FTP Error: %s not arrived or readable"
 				  filename)))))
 		  (if binary
-		      (ange-ftp-set-ascii-mode host user))
+		      ;; We must keep `last-coding-system-used'
+		      ;; unchanged.
+		      (let (last-coding-system-used)
+			(ange-ftp-set-ascii-mode host user)))
 		  (ange-ftp-del-tmp-name temp))
 		(if visit
 		    (progn