# HG changeset patch # User Richard M. Stallman # Date 893225882 0 # Node ID 71eacf46567cc9687eb4043085b646df3cd10203 # Parent e2283c4df334f860d8f0683c7bc144a73ac40777 (rmail): Don't bind enable-local-variables. diff -r e2283c4df334 -r 71eacf46567c lisp/mail/rmail.el --- a/lisp/mail/rmail.el Wed Apr 22 03:19:43 1998 +0000 +++ b/lisp/mail/rmail.el Wed Apr 22 06:18:02 1998 +0000 @@ -494,18 +494,19 @@ run-mail-hook msg-shown) ;; Like find-file, but in the case where a buffer existed ;; and the file was reverted, recompute the message-data. + ;; We used to bind enable-local-variables to nil here, + ;; but that should not be needed now that rmail-mode + ;; sets it locally to nil. + ;; (Binding a variable locally with let is not safe if it has + ;; buffer-local bindings.) (if (and existed (not (verify-visited-file-modtime existed))) (progn - ;; Don't be confused by apparent local-variables spec - ;; in the last message in the RMAIL file. - (let ((enable-local-variables nil)) - (find-file file-name)) + (find-file file-name) (if (and (verify-visited-file-modtime existed) (eq major-mode 'rmail-mode)) (progn (rmail-forget-messages) (rmail-set-message-counters)))) - (let ((enable-local-variables nil)) - (find-file file-name))) + (find-file file-name)) (if (eq major-mode 'rmail-edit-mode) (error "Exit Rmail Edit mode before getting new mail")) (if (and existed (> (buffer-size) 0))