From 8a2f1176c437e6787bde6dd19822c38109a9c226 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 21 Jun 2002 09:53:47 +0000 Subject: [PATCH] (format-annotate-function): Copy multibyte flag and selective-display into the new temp buffer. --- lisp/format.el | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/format.el b/lisp/format.el index ad7a22bba91..715374bb50f 100644 --- a/lisp/format.el +++ b/lisp/format.el @@ -221,7 +221,12 @@ For most purposes, consider using `format-encode-region' instead." (if modify ;; To-function wants to modify region. Copy to safe place. (let ((copy-buf (get-buffer-create (format " *Format Temp %d*" - format-count)))) + format-count))) + (sel-disp selective-display) + (multibyte enable-multibyte-characters)) + (with-current-buffer copy-buf + (setq selective-display sel-disp) + (set-buffer-multibyte multibyte)) (copy-to-buffer copy-buf from to) (set-buffer copy-buf) (format-insert-annotations write-region-annotations-so-far from) -- 2.39.2