diff lisp/mail/rmail.el @ 42659:9522b2780ef1

(rmail-decode-babyl-format): Disable undo around the decode-coding-region call.
author Richard M. Stallman <rms@gnu.org>
date Fri, 11 Jan 2002 21:23:40 +0000
parents 3ae5a751a34a
children 5be5677eb18e
line wrap: on
line diff
--- a/lisp/mail/rmail.el	Fri Jan 11 21:22:28 2002 +0000
+++ b/lisp/mail/rmail.el	Fri Jan 11 21:23:40 2002 +0000
@@ -790,7 +790,8 @@
     (unless (memq coding-system
 		  '(undecided undecided-unix))
       (set-buffer-modified-p t)		; avoid locking when decoding
-      (decode-coding-region from to coding-system)
+      (let ((buffer-undo-list t))
+	(decode-coding-region from to coding-system))
       (setq coding-system last-coding-system-used))
     (set-buffer-modified-p modifiedp)
     (setq buffer-file-coding-system nil)