1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-03 08:30:09 +00:00

Fix auth-sources defcustom

* 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).
This commit is contained in:
Mauro Aranda 2022-02-23 21:05:08 +01:00 committed by Lars Ingebrigtsen
parent b8a96f0556
commit 479623784e

View 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"