# HG changeset patch # User Gerd Moellmann # Date 975936746 0 # Node ID 019ee6a5a637d28614e21a0f3c48107a9e3d2dd6 # Parent 0fec18127c7168276fcde3e45c4f448ccff9fb76 (format-decode): Don't change buffer's undo list. diff -r 0fec18127c71 -r 019ee6a5a637 lisp/format.el --- a/lisp/format.el Mon Dec 04 13:31:13 2000 +0000 +++ b/lisp/format.el Mon Dec 04 13:32:26 2000 +0000 @@ -248,7 +248,6 @@ (unwind-protect (progn ;; Don't record undo information for the decoding. - (setq buffer-undo-list t) (if (null format) ;; Figure out which format it is in, remember list in `format'. @@ -286,8 +285,8 @@ (if visit-flag (setq buffer-file-format format))) - (set-buffer-modified-p mod) - (setq buffer-undo-list nil)) + (set-buffer-modified-p mod)) + ;; Return new length of region (- end begin)))