comparison lisp/textmodes/reftex-vars.el @ 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 684aaf007d39
children c365b1256696
comparison
equal deleted inserted replaced
70221:1fd89e2b70fd 70222:c95a147129b4
946 which is active when entering the selection process. 946 which is active when entering the selection process.
947 Instead of nil or t, this may also be a string of type letters indicating 947 Instead of nil or t, this may also be a string of type letters indicating
948 the label types for which it should be true." 948 the label types for which it should be true."
949 :group 'reftex-referencing-labels 949 :group 'reftex-referencing-labels
950 :type `(choice :tag "\\vref is default macro" ,@reftex-tmp)) 950 :type `(choice :tag "\\vref is default macro" ,@reftex-tmp))
951 ;;;###autoload(put 'reftex-vref-is-default 'safe-local-variable t) 951 ;;;###autoload(put 'reftex-vref-is-default 'safe-local-variable (lambda (x) (or (stringp x) (symbolp x))))
952 952
953 (defcustom reftex-fref-is-default nil 953 (defcustom reftex-fref-is-default nil
954 "*Non-nil means, the fancyref macro \\fref is used as default. 954 "*Non-nil means, the fancyref macro \\fref is used as default.
955 In the selection buffer, the `V' key toggles the reference macro between 955 In the selection buffer, the `V' key toggles the reference macro between
956 `\\ref', `\\fref' and `\\Fref'. The value of this variable determines 956 `\\ref', `\\fref' and `\\Fref'. The value of this variable determines
957 the default which is active when entering the selection process. 957 the default which is active when entering the selection process.
958 Instead of nil or t, this may also be a string of type letters indicating 958 Instead of nil or t, this may also be a string of type letters indicating
959 the label types for which it should be true." 959 the label types for which it should be true."
960 :group 'reftex-referencing-labels 960 :group 'reftex-referencing-labels
961 :type `(choice :tag "\\fref is default macro" ,@reftex-tmp)) 961 :type `(choice :tag "\\fref is default macro" ,@reftex-tmp))
962 ;;;###autoload(put 'reftex-fref-is-default 'safe-local-variable t) 962 ;;;###autoload(put 'reftex-fref-is-default 'safe-local-variable (lambda (x) (or (stringp x) (symbolp x))))
963 963
964 (defcustom reftex-level-indent 2 964 (defcustom reftex-level-indent 2
965 "*Number of spaces to be used for indentation per section level." 965 "*Number of spaces to be used for indentation per section level."
966 :group 'reftex-referencing-labels 966 :group 'reftex-referencing-labels
967 :type 'integer) 967 :type 'integer)
973 the words given in `reftex-label-alist'. When it finds a match, RefTeX will 973 the words given in `reftex-label-alist'. When it finds a match, RefTeX will
974 immediately offer the correct label menu - otherwise it will prompt you for 974 immediately offer the correct label menu - otherwise it will prompt you for
975 a label type. If you set this variable to nil, RefTeX will always prompt." 975 a label type. If you set this variable to nil, RefTeX will always prompt."
976 :group 'reftex-referencing-labels 976 :group 'reftex-referencing-labels
977 :type 'boolean) 977 :type 'boolean)
978 ;;;###autoload(put 'reftex-guess-label-type 'safe-local-variable t) 978 ;;;###autoload(put 'reftex-guess-label-type 'safe-local-variable 'symbolp)
979 979
980 (defcustom reftex-format-ref-function nil 980 (defcustom reftex-format-ref-function nil
981 "Function which produces the string to insert as a reference. 981 "Function which produces the string to insert as a reference.
982 Normally should be nil, because the format to insert a reference can 982 Normally should be nil, because the format to insert a reference can
983 already be specified in `reftex-label-alist'. 983 already be specified in `reftex-label-alist'.