mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-23 18:47:57 +00:00
Code Issues Releases Activity

(format-encode-run-method, format-decode-run-method): Fix previous change.

Browse Source
This commit is contained in:
Dave Love 1999-02-18 15:46:31 +00:00
parent cd52991697
commit 7cc45a35b1
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/format.el
View File

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