diff options
| author | Pierre Téchoueyres <Pierre.Techoueyres@gfi.fr> | 2015-08-18 14:24:16 +0200 |
|---|---|---|
| committer | Michael Albinus <michael.albinus@gmx.de> | 2015-08-18 14:24:16 +0200 |
| commit | 0e1711a0e29428173a743d38bfaba82fd56d77be (patch) | |
| tree | a42d85893b8f9de84f07753bce7986ab3f04308f /lisp/net/tramp-cmds.el | |
| parent | 07ebe42546abbc9823c9ce3c7b2e397b551838a1 (diff) | |
| download | emacs-0e1711a0e29428173a743d38bfaba82fd56d77be.tar.gz emacs-0e1711a0e29428173a743d38bfaba82fd56d77be.tar.bz2 emacs-0e1711a0e29428173a743d38bfaba82fd56d77be.zip | |
* lisp/net/tramp-cmds.el (tramp-reporter-dump-variable):
Encode/decode string.
Copyright-paperwork-exempt: yes
Diffstat (limited to 'lisp/net/tramp-cmds.el')
| -rw-r--r-- | lisp/net/tramp-cmds.el | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/lisp/net/tramp-cmds.el b/lisp/net/tramp-cmds.el index fee74eedec2..22c139859f9 100644 --- a/lisp/net/tramp-cmds.el +++ b/lisp/net/tramp-cmds.el @@ -236,8 +236,11 @@ buffer in your bug report. (string-match (concat "[^" (symbol-value 'mm-7bit-chars) "]") val)) (with-current-buffer reporter-eval-buffer - (set varsym (format "(base64-decode-string \"%s\")" - (base64-encode-string val)))))) + (set + varsym + (format + "(decode-coding-string (base64-decode-string \"%s\") 'raw-text)" + (base64-encode-string (encode-coding-string val 'raw-text))))))) ;; Dump variable. (tramp-compat-funcall 'reporter-dump-variable varsym mailbuf) |