Mercurial > emacs

changeset 24521:f4dd298e46a3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(rmail-decode-babyl-format): To prevent locking, bind buffer-file-name to nil.
author Karl Heuer <kwzh@gnu.org>
date Fri, 26 Mar 1999 17:58:09 +0000
parents e8b7cb3fac8c
children 3147a1a92eeb
files lisp/mail/rmail.el
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/rmail.el	Fri Mar 26 17:55:42 1999 +0000
+++ b/lisp/mail/rmail.el	Fri Mar 26 17:58:09 1999 +0000
@@ -659,9 +659,9 @@
       (setq coding-system (detect-coding-region from to t)))
     (unless (memq coding-system
 		  '(undecided undecided-unix))
-      (set-buffer-modified-p t)		; avoid locking when decoding
-      (decode-coding-region from to coding-system)
-      (setq coding-system last-coding-system-used))
+      (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 modifiedp)
     (setq buffer-file-coding-system nil)
     (setq save-buffer-coding-system