From 5258c763ce67c0712ff543b0bf3001d156a9ac48 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Wed, 14 May 2003 21:30:21 +0000 Subject: [PATCH] (format-annotate-function): Copy coding system into the new temp buffer. --- lisp/format.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/format.el b/lisp/format.el index c9259fd31a4..97818c79ef4 100644 --- a/lisp/format.el +++ b/lisp/format.el @@ -223,10 +223,12 @@ For most purposes, consider using `format-encode-region' instead." (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) -- 2.11.4.GIT