aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1999-04-07 06:11:36 +0000
committerRichard M. Stallman1999-04-07 06:11:36 +0000
commitb68a01e7995910caed59b6f1ef651fb8668d123f (patch)
treed8932169645b8f8dc5d1b8f929a88430b8554127
parent8ea3e054450cf4360594cd4bbf6cffba29e4a592 (diff)
downloademacs-b68a01e7995910caed59b6f1ef651fb8668d123f.tar.gz
emacs-b68a01e7995910caed59b6f1ef651fb8668d123f.zip
(rmail-decode-babyl-format): Undo previous change.
-rw-r--r--lisp/mail/rmail.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index e5a61a2e197..03cc374d6bb 100644
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -665,9 +665,9 @@ Note: it means the file has no messages in it.\n\^_")))
665 (setq coding-system (detect-coding-region from to t))) 665 (setq coding-system (detect-coding-region from to t)))
666 (unless (memq coding-system 666 (unless (memq coding-system
667 '(undecided undecided-unix)) 667 '(undecided undecided-unix))
668 (let (buffer-file-truename) ; Avoid locking when decoding. 668 (set-buffer-modified-p t) ; avoid locking when decoding
669 (decode-coding-region from to coding-system) 669 (decode-coding-region from to coding-system)
670 (setq coding-system last-coding-system-used))) 670 (setq coding-system last-coding-system-used))
671 (set-buffer-modified-p modifiedp) 671 (set-buffer-modified-p modifiedp)
672 (setq buffer-file-coding-system nil) 672 (setq buffer-file-coding-system nil)
673 (setq save-buffer-coding-system 673 (setq save-buffer-coding-system