emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 2f63dab3ee5: In bibtex.el, fix widgets for customization types (b


From: Roland Winkler
Subject: master 2f63dab3ee5: In bibtex.el, fix widgets for customization types (bug#74409)
Date: Fri, 10 Jan 2025 23:34:57 -0500 (EST)

branch: master
commit 2f63dab3ee566f5794fac4139a8f8b8b9e250a00
Author: Roland Winkler <winkler@gnu.org>
Commit: Roland Winkler <winkler@gnu.org>

    In bibtex.el, fix widgets for customization types (bug#74409)
    
    * lisp/textmodes/bibtex.el (bibtex-field-list, bibtex-entry-alist)
    (bibtex-field-alist): Fix widgets for customization types (bug#74409).
---
 lisp/textmodes/bibtex.el | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

diff --git a/lisp/textmodes/bibtex.el b/lisp/textmodes/bibtex.el
index 5e79ccc6e55..601331cbce2 100644
--- a/lisp/textmodes/bibtex.el
+++ b/lisp/textmodes/bibtex.el
@@ -283,6 +283,7 @@ If parsing fails, try to set this variable to nil."
 
 (define-widget 'bibtex-field-list 'lazy
   "Format of fields of entries in `bibtex-BibTeX-entry-alist' and friends."
+  :tag "Field list"
   :type '(group (string :tag "Field")
                 (option (choice :tag "Comment" :value nil
                                 (const nil) string))
@@ -293,7 +294,9 @@ If parsing fails, try to set this variable to nil."
 
 (define-widget 'bibtex-entry-alist 'lazy
   "Format of `bibtex-BibTeX-entry-alist' and friends."
+  :tag "Entry alist"
   :type '(repeat
+          :format "\n%v"
           (choice (group :tag "Alias"
                          (string :tag "Entry type")
                          (string :tag "Documentation")
@@ -860,8 +863,11 @@ Use this, e.g., for custom fields, see Sec. 2.2.4 of the 
biblatex manual."
 
 (define-widget 'bibtex-field-alist 'lazy
   "Format of `bibtex-BibTeX-field-alist' and friends."
-  :type '(repeat (group (string :tag "Field type")
-                        (string :tag "Comment"))))
+  :tag "Field alist"
+  :type '(repeat
+          :format "\n%v"
+          (group (string :tag "Field type")
+                 (string :tag "Comment"))))
 
 (defcustom bibtex-BibTeX-field-alist
   '(("author" "Author1 [and Author2 ...] [and others]")



reply via email to

[Prev in Thread] Current Thread [Next in Thread]