From: Dave Love Date: Thu, 18 Feb 1999 15:46:31 +0000 (+0000) Subject: (format-encode-run-method, format-decode-run-method): Fix previous change. X-Git-Tag: emacs-20.4~602 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7cc45a35b1aea566175263f16924a4304536810a;p=emacs.git (format-encode-run-method, format-decode-run-method): Fix previous change. --- diff --git a/lisp/format.el b/lisp/format.el index 73eabc1730f..6fab2a3e725 100644 --- a/lisp/format.el +++ b/lisp/format.el @@ -149,7 +149,7 @@ otherwise, it should be a Lisp function. BUFFER should be the buffer that the output originally came from." (if (stringp method) (let ((error-buff (get-buffer-create "*Format Errors*")) - (coding-system-for-write 'no-conversion) + (coding-system-for-read 'no-conversion) format-alist) (with-current-buffer error-buff (widen) @@ -170,7 +170,7 @@ If METHOD is a string, it is a shell command; otherwise, it should be a Lisp function. Decoding is done for the given BUFFER." (if (stringp method) (let ((error-buff (get-buffer-create "*Format Errors*")) - (coding-system-for-read 'no-conversion) ; like jka-compr + (coding-system-for-write 'no-conversion) format-alist) (with-current-buffer error-buff (widen)