diff options
author | Gerd Moellmann <gerd@gnu.org> | 2000-12-04 13:32:26 +0000 |
---|---|---|
committer | Gerd Moellmann <gerd@gnu.org> | 2000-12-04 13:32:26 +0000 |
commit | 021cfbea756f926ded84b4d893ff1df7ecd71f99 (patch) | |
tree | 26b372acff7706d1bb1aec2417da59eeef103fe8 /lisp/format.el | |
parent | 392e96d4e52bd5f48dafd4f4c4f68fe374134e95 (diff) | |
download | emacs-021cfbea756f926ded84b4d893ff1df7ecd71f99.tar.gz |
(format-decode): Don't change buffer's undo list.
Diffstat (limited to 'lisp/format.el')
-rw-r--r-- | lisp/format.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/format.el b/lisp/format.el index dba7ecbff2a..c1919c24e13 100644 --- a/lisp/format.el +++ b/lisp/format.el @@ -248,7 +248,6 @@ For most purposes, consider using `format-decode-region' instead." (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 @@ For most purposes, consider using `format-decode-region' instead." (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))) |