From 7cc45a35b1aea566175263f16924a4304536810a Mon Sep 17 00:00:00 2001 From: Dave Love Date: Thu, 18 Feb 1999 15:46:31 +0000 Subject: [PATCH] (format-encode-run-method, format-decode-run-method): Fix previous change. --- lisp/format.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) 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) -- 2.39.2