andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

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

Browse source 
Encode/decode string.

Copyright-paperwork-exempt: yes
This commit is contained in:
Pierre Téchoueyres 2015-08-18 14:24:16 +02:00 • committed by Michael Albinus
parent 07ebe42546
commit 0e1711a0e2
1 changed files with 5 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
lisp/net/tramp-cmds.el
View file

@ -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)