Mercurial > emacs
changeset 70222:c95a147129b4
(reftex-vref-is-default, reftex-fref-is-default, reftex-guess-label-type):
Tighten up a bit the safety predicate.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Wed, 26 Apr 2006 05:30:29 +0000 |
| parents | 1fd89e2b70fd |
| children | 7dc26b206eba |
| files | lisp/ChangeLog lisp/textmodes/reftex-vars.el |
| diffstat | 2 files changed, 7 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Wed Apr 26 05:28:47 2006 +0000 +++ b/lisp/ChangeLog Wed Apr 26 05:30:29 2006 +0000 @@ -1,5 +1,9 @@ 2006-04-26 Stefan Monnier <monnier@iro.umontreal.ca> + * textmodes/reftex-vars.el (reftex-vref-is-default) + (reftex-fref-is-default, reftex-guess-label-type): + Tighten up a bit the safety predicate. + * textmodes/paragraphs.el (sentence-end-double-space) (sentence-end-without-period, sentence-end-without-space) (page-delimiter, paragraph-ignore-fill-prefix):
--- a/lisp/textmodes/reftex-vars.el Wed Apr 26 05:28:47 2006 +0000 +++ b/lisp/textmodes/reftex-vars.el Wed Apr 26 05:30:29 2006 +0000 @@ -948,7 +948,7 @@ the label types for which it should be true." :group 'reftex-referencing-labels :type `(choice :tag "\\vref is default macro" ,@reftex-tmp)) -;;;###autoload(put 'reftex-vref-is-default 'safe-local-variable t) +;;;###autoload(put 'reftex-vref-is-default 'safe-local-variable (lambda (x) (or (stringp x) (symbolp x)))) (defcustom reftex-fref-is-default nil "*Non-nil means, the fancyref macro \\fref is used as default. @@ -959,7 +959,7 @@ the label types for which it should be true." :group 'reftex-referencing-labels :type `(choice :tag "\\fref is default macro" ,@reftex-tmp)) -;;;###autoload(put 'reftex-fref-is-default 'safe-local-variable t) +;;;###autoload(put 'reftex-fref-is-default 'safe-local-variable (lambda (x) (or (stringp x) (symbolp x)))) (defcustom reftex-level-indent 2 "*Number of spaces to be used for indentation per section level." @@ -975,7 +975,7 @@ a label type. If you set this variable to nil, RefTeX will always prompt." :group 'reftex-referencing-labels :type 'boolean) -;;;###autoload(put 'reftex-guess-label-type 'safe-local-variable t) +;;;###autoload(put 'reftex-guess-label-type 'safe-local-variable 'symbolp) (defcustom reftex-format-ref-function nil "Function which produces the string to insert as a reference.