mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-12-04 08:47:11 +00:00
(bibtex-maintain-sorted-entries): Mark as safe.
This commit is contained in:
parent
193948a0b0
commit
eab10abb18
@ -87,7 +87,7 @@ If this is a function, call it to generate the initial field text."
|
||||
:type '(choice (const :tag "None" nil)
|
||||
(string :tag "Initial text")
|
||||
(function :tag "Initialize Function" :value fun)
|
||||
(other :tag "Default" t)))
|
||||
(const :tag "Default" t)))
|
||||
(put 'bibtex-include-OPTkey 'risky-local-variable t)
|
||||
|
||||
(defcustom bibtex-user-optional-fields
|
||||
@ -153,7 +153,7 @@ narrowed to just the entry."
|
||||
(defcustom bibtex-maintain-sorted-entries nil
|
||||
"If non-nil, BibTeX mode maintains all entries in sorted order.
|
||||
Allowed non-nil values are:
|
||||
plain All entries are sorted alphabetically.
|
||||
plain or t All entries are sorted alphabetically.
|
||||
crossref All entries are sorted alphabetically unless an entry has a
|
||||
crossref field. These crossrefed entries are placed in
|
||||
alphabetical order immediately preceding the main entry.
|
||||
@ -165,7 +165,10 @@ See also `bibtex-sort-ignore-string-entries'."
|
||||
:type '(choice (const nil)
|
||||
(const plain)
|
||||
(const crossref)
|
||||
(const entry-class)))
|
||||
(const entry-class)
|
||||
(const t)))
|
||||
(put 'bibtex-maintain-sorted-entries 'safe-local-variable
|
||||
(lambda (a) (memq a '(nil t plain crossref entry-class))))
|
||||
|
||||
(defcustom bibtex-sort-entry-class
|
||||
'(("String")
|
||||
|
Loading…
Reference in New Issue
Block a user