Mercurial > emacs
diff lisp/format.el @ 51001:9d852ed73287
(format-annotate-function): Copy coding system into the new temp buffer.
author | Juanma Barranquero <lekktu@gmail.com> |
---|---|
date | Wed, 14 May 2003 21:30:21 +0000 |
parents | 37645a051842 |
children | 695cf19ef79e |
line wrap: on
line diff
--- a/lisp/format.el Wed May 14 21:27:14 2003 +0000 +++ b/lisp/format.el Wed May 14 21:30:21 2003 +0000 @@ -223,10 +223,12 @@ (let ((copy-buf (get-buffer-create (format " *Format Temp %d*" format-count))) (sel-disp selective-display) - (multibyte enable-multibyte-characters)) + (multibyte enable-multibyte-characters) + (coding-system buffer-file-coding-system)) (with-current-buffer copy-buf (setq selective-display sel-disp) - (set-buffer-multibyte multibyte)) + (set-buffer-multibyte multibyte) + (setq buffer-file-coding-system coding-system)) (copy-to-buffer copy-buf from to) (set-buffer copy-buf) (format-insert-annotations write-region-annotations-so-far from)