# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 923465496 0
# Node ID 244e710f313471b9a8c3e1579806e84e549fc272
# Parent  0e5c5bd9b99de201e1e3c1a0980b6a096d200389
(rmail-decode-babyl-format): Undo previous change.

diff -r 0e5c5bd9b99d -r 244e710f3134 lisp/mail/rmail.el
--- a/lisp/mail/rmail.el	Wed Apr 07 05:48:00 1999 +0000
+++ b/lisp/mail/rmail.el	Wed Apr 07 06:11:36 1999 +0000
@@ -665,9 +665,9 @@
       (setq coding-system (detect-coding-region from to t)))
     (unless (memq coding-system
 		  '(undecided undecided-unix))
-      (let (buffer-file-truename)	; Avoid locking when decoding.
-	(decode-coding-region from to coding-system)
-	(setq coding-system last-coding-system-used)))
+      (set-buffer-modified-p t)		; avoid locking when decoding
+      (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)
     (setq save-buffer-coding-system