summaryrefslogtreecommitdiff
path: root/lisp/mail/supercite.el
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2019-06-15 16:59:21 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2019-06-15 16:59:21 +0200
commit4d2b3bcd038ffea4a2951cdc2735a904fc875e3a (patch)
tree77d771f720fdc6617f2aadcb0baf137d8156495e /lisp/mail/supercite.el
parente10e48896f438e315fcc16c90233b55ee22f1c7b (diff)
downloademacs-4d2b3bcd038ffea4a2951cdc2735a904fc875e3a.tar.gz
Suppress compilation warning in supercite.el
* lisp/mail/supercite.el (curline): Suppress warning about non-prefixed variable used by forms in the `sc-mail-glom-frame' variable.
Diffstat (limited to 'lisp/mail/supercite.el')
-rw-r--r--lisp/mail/supercite.el6
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/mail/supercite.el b/lisp/mail/supercite.el
index ad69dca8c43..ce00a7cf665 100644
--- a/lisp/mail/supercite.el
+++ b/lisp/mail/supercite.el
@@ -702,7 +702,11 @@ the list should be unique."
"Regi frame for glomming mail header information.")
(put 'sc-mail-glom-frame 'risky-local-variable t)
-(defvar curline) ; dynamic bondage
+;; This variable is bound dynamically before calling the forms in the
+;; `sc-mail-glom-frame' variable, and is part of the advertised
+;; interface.
+(with-suppressed-warnings ((lexical curline))
+ (defvar curline))
;; regi functions