Mercurial > emacs
comparison lisp/net/tramp.el @ 75194:59eb85a37abd
* net/tramp.el (tramp-handle-file-local-copy): Set
`enable-multibyte-characters' to nil. Reported by Chris Moore
<christopher.ian.moore@gmail.com>.
| author | Michael Albinus <michael.albinus@gmx.de> |
|---|---|
| date | Thu, 11 Jan 2007 20:08:04 +0000 |
| parents | bdffb0038313 |
| children | 9cc44485654f |
comparison
equal
deleted
inserted
replaced
| 75193:71763661a76e | 75194:59eb85a37abd |
|---|---|
| 3810 | 3810 |
| 3811 (tramp-message 5 "Decoding remote file %s..." filename) | 3811 (tramp-message 5 "Decoding remote file %s..." filename) |
| 3812 | 3812 |
| 3813 ;; Here is where loc-enc and loc-dec used to be let-bound. | 3813 ;; Here is where loc-enc and loc-dec used to be let-bound. |
| 3814 (if (and (symbolp loc-dec) (fboundp loc-dec)) | 3814 (if (and (symbolp loc-dec) (fboundp loc-dec)) |
| 3815 ;; If local decoding is a function, we call it. | 3815 ;; If local decoding is a function, we call it. We |
| 3816 ;; must disable multibyte, because | |
| 3817 ;; `uudecode-decode-region' doesn't handle it | |
| 3818 ;; correctly. | |
| 3816 (let ((tmpbuf (get-buffer-create " *tramp tmp*"))) | 3819 (let ((tmpbuf (get-buffer-create " *tramp tmp*"))) |
| 3817 (set-buffer tmpbuf) | 3820 (set-buffer tmpbuf) |
| 3818 (erase-buffer) | 3821 (erase-buffer) |
| 3822 (set-buffer-multibyte nil) | |
| 3819 (insert-buffer-substring tramp-buf) | 3823 (insert-buffer-substring tramp-buf) |
| 3820 (tramp-message-for-buffer | 3824 (tramp-message-for-buffer |
| 3821 multi-method method user host | 3825 multi-method method user host |
| 3822 6 "Decoding remote file %s with function %s..." | 3826 6 "Decoding remote file %s with function %s..." |
| 3823 filename loc-dec) | 3827 filename loc-dec) |