changeset 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 72af65197e01
children 8a62ebf7de02
files lisp/format.el
diffstat 1 files changed, 4 insertions(+), 2 deletions(-) [+]
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)