]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix auth-sources defcustom
authorMauro Aranda <maurooaranda@gmail.com>
Wed, 23 Feb 2022 20:05:08 +0000 (21:05 +0100)
committerLars Ingebrigtsen <larsi@gnus.org>
Wed, 23 Feb 2022 20:05:08 +0000 (21:05 +0100)
* lisp/auth-source.el (auth-sources): The extra attributes should be
in a plist, so inline both :host and :port.  Also, give a valid
default value for the choice (bug#54127).

lisp/auth-source.el

index 8a425cf9bc0051826876a8dff84939983b743044..cb528cebdcd9b6dc3e0bb2cfea8745467dadbea4 100644 (file)
@@ -280,15 +280,16 @@ can get pretty complex."
                                          (const :tag "default" default))))
                         (repeat :tag "Extra Parameters" :inline t
                                 (choice :tag "Extra parameter"
+                                        :value (:host t)
                                         (list
-                                         :tag "Host"
+                                         :tag "Host" :inline t
                                          (const :format "" :value :host)
                                          (choice :tag "Host (machine) choice"
                                                  (const :tag "Any" t)
                                                  (regexp
                                                   :tag "Regular expression")))
                                         (list
-                                         :tag "Protocol"
+                                         :tag "Protocol" :inline t
                                          (const :format "" :value :port)
                                          (choice
                                           :tag "Protocol"