From: Richard M. Stallman Date: Wed, 22 Apr 1998 06:18:02 +0000 (+0000) Subject: (rmail): Don't bind enable-local-variables. X-Git-Tag: emacs-20.3~1371 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=078395abe771887a9efebd62df0f39bf413756d3;p=emacs.git (rmail): Don't bind enable-local-variables. --- diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index d481b8b7918..eabda68d699 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el @@ -494,18 +494,19 @@ If `rmail-display-summary' is non-nil, make a summary for this RMAIL file." 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))