* lisp/net/tramp-cmds.el (tramp-reporter-dump-variable):

Encode/decode string.

Copyright-paperwork-exempt: yes

diff --git a/lisp/net/tramp-cmds.el b/lisp/net/tramp-cmds.el
index fee74eedec2d8156ca6c99658fc2b9d20ce88663..22c139859f90ba2f20324db1ecbcad48dbf92653 100644 (file)
--- 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)