Commit 1d1cf99f authored by Chong Yidong's avatar Chong Yidong
Browse files

(format-annotate-function): Set write-region-post-annotation-function.

parent ae12425c
...@@ -218,6 +218,9 @@ For most purposes, consider using `format-encode-region' instead." ...@@ -218,6 +218,9 @@ For most purposes, consider using `format-encode-region' instead."
(multibyte enable-multibyte-characters) (multibyte enable-multibyte-characters)
(coding-system buffer-file-coding-system)) (coding-system buffer-file-coding-system))
(with-current-buffer copy-buf (with-current-buffer copy-buf
(set (make-local-variable
'write-region-post-annotation-function)
'kill-buffer)
(setq selective-display sel-disp) (setq selective-display sel-disp)
(set-buffer-multibyte multibyte) (set-buffer-multibyte multibyte)
(setq buffer-file-coding-system coding-system)) (setq buffer-file-coding-system coding-system))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment