[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master a979a0a 1/3: Suppress warning about non-prefixed va
From: |
Lars Ingebrigtsen |
Subject: |
[Emacs-diffs] master a979a0a 1/3: Suppress warning about non-prefixed variable in mailalias.el |
Date: |
Sat, 15 Jun 2019 10:59:44 -0400 (EDT) |
branch: master
commit a979a0ad07a8e2452c1267d2c1299000e543051d
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>
Suppress warning about non-prefixed variable in mailalias.el
* lisp/mail/mailalias.el (patters): Suppress warning about
non-prefixed variable used by `mail-complete-alist'.
---
lisp/mail/mailalias.el | 6 +++++-
1 file changed, 5 insertions(+), 1 deletion(-)
diff --git a/lisp/mail/mailalias.el b/lisp/mail/mailalias.el
index 42896c1..8bb4263 100644
--- a/lisp/mail/mailalias.el
+++ b/lisp/mail/mailalias.el
@@ -52,7 +52,11 @@ When t this still needs to be initialized.")
(defvar mail-address-field-regexp
"^\\(Resent-\\)?\\(To\\|From\\|Cc\\|Bcc\\|Reply-To\\):")
-(defvar pattern)
+;; `pattern' is bound dynamically before evaluating the forms in
+;; `mail-complete-alist' and may be part of user customizations of
+;; that variable.
+(with-suppressed-warnings ((lexical pattern))
+ (defvar pattern))
(defcustom mail-complete-alist
;; Don't refer to mail-address-field-regexp here;