From a979a0ad07a8e2452c1267d2c1299000e543051d Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Sat, 15 Jun 2019 16:53:52 +0200 Subject: [PATCH] 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 42896c18ebe..8bb42634892 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; -- 2.39.5