Mercurial > emacs
changeset 21705:71eacf46567c
(rmail): Don't bind enable-local-variables.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Wed, 22 Apr 1998 06:18:02 +0000 |
| parents | e2283c4df334 |
| children | a0c3ee34362d |
| files | lisp/mail/rmail.el |
| diffstat | 1 files changed, 7 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- 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))