# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1010784220 0
# Node ID 9522b2780ef14a4d66712ad919cbb0bb091864e8
# Parent  c45e40c77be670aba4caf2db5395daee5e200c13
(rmail-decode-babyl-format): Disable undo around the decode-coding-region call.

diff -r c45e40c77be6 -r 9522b2780ef1 lisp/mail/rmail.el
--- 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)