Index: emacs/lisp/mail/supercite.el
diff -c emacs/lisp/mail/supercite.el:1.43 emacs/lisp/mail/supercite.el:1.44
*** emacs/lisp/mail/supercite.el:1.43 Mon Apr 4 09:19:51 2005
--- emacs/lisp/mail/supercite.el Sat May 14 11:27:40 2005
***************
*** 153,158 ****
--- 153,159 ----
(choice (repeat (repeat sexp))
symbol)))))
:group 'supercite-frames)
+ (put 'sc-cite-frame-alist 'risky-local-variable t)
(defcustom sc-uncite-frame-alist '()
"*Alist for frame selection during unciting.
***************
*** 161,166 ****
--- 162,168 ----
(choice (repeat (repeat sexp))
symbol)))))
:group 'supercite-frames)
+ (put 'sc-uncite-frame-alist 'risky-local-variable t)
(defcustom sc-recite-frame-alist '()
"*Alist for frame selection during reciting.
***************
*** 169,174 ****
--- 171,177 ----
(choice (repeat (repeat sexp))
symbol)))))
:group 'supercite-frames)
+ (put 'sc-recite-frame-alist 'risky-local-variable t)
(defcustom sc-default-cite-frame
'(;; initialize fill state and temporary variables when entering
***************
*** 214,219 ****
--- 217,223 ----
"*Default REGI frame for citing a region."
:type '(repeat (repeat sexp))
:group 'supercite-frames)
+ (put 'sc-default-cite-frame 'risky-local-variable t)
(defcustom sc-default-uncite-frame
'(;; do nothing on a blank line
***************
*** 224,229 ****
--- 228,234 ----
"*Default REGI frame for unciting a region."
:type '(repeat (repeat sexp))
:group 'supercite-frames)
+ (put 'sc-default-uncite-frame 'risky-local-variable t)
(defcustom sc-default-recite-frame
'(;; initialize fill state when entering frame
***************
*** 240,245 ****
--- 245,251 ----
"*Default REGI frame for reciting a region."
:type '(repeat (repeat sexp))
:group 'supercite-frames)
+ (put 'sc-default-recite-frame 'risky-local-variable t)
(defcustom sc-cite-region-limit t
"*This variable controls automatic citation of yanked text.
***************
*** 427,432 ****
--- 433,439 ----
(choice (sexp :tag "List to eval")
string)))))
:group 'supercite-attr)
+ (put 'sc-attrib-selection-list 'risky-local-variable t)
(defcustom sc-attribs-preselect-hook nil
"*Hook to run before selecting an attribution."
***************
*** 482,487 ****
--- 489,495 ----
Electric reference mode will cycle through this list of functions."
:type '(repeat sexp)
:group 'supercite)
+ (put 'sc-rewrite-header-list 'risky-local-variable t)
(defcustom sc-titlecue-regexp "\\s +-+\\s +"
"*Regular expression describing the separator between names and titles.
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
