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.

diff --git a/lisp/mail/supercite.el b/lisp/mail/supercite.el
index ad69dca8c43444222473f3bb570879766315979f..ce00a7cf6652e7215d883dd55d385f4ee1acc1c5 100644 (file)
--- 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