emacs-elpa-diffs
[Top][All Lists]
Advanced

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

[nongnu] elpa/git-commit 4ac38a2d2a 1/3: magit-clone-{url-format, name-a


From: ELPA Syncer
Subject: [nongnu] elpa/git-commit 4ac38a2d2a 1/3: magit-clone-{url-format, name-alist}: Fix option definitions
Date: Wed, 31 Aug 2022 10:58:55 -0400 (EDT)

branch: elpa/git-commit
commit 4ac38a2d2a6b556b1a84fc0fa38bcac344a61981
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>

    magit-clone-{url-format,name-alist}: Fix option definitions
---
 lisp/magit-clone.el | 14 ++++++++------
 1 file changed, 8 insertions(+), 6 deletions(-)

diff --git a/lisp/magit-clone.el b/lisp/magit-clone.el
index e93344b2d1..bd88ad6b73 100644
--- a/lisp/magit-clone.el
+++ b/lisp/magit-clone.el
@@ -86,11 +86,11 @@ default user specified in the matched entry is used.
 If USER contains a dot, then it is treated as a Git variable and
 the value of that is used as the username.  Otherwise it is used
 as the username itself."
-  :package-version '(magit . "3.0.0")
+  :package-version '(magit . "3.4.0")
   :group 'magit-commands
   :type '(repeat (list regexp
-                       (string :tag "hostname")
-                       (string :tag "user name or git variable"))))
+                       (string :tag "Hostname")
+                       (string :tag "User name or git variable"))))
 
 (defcustom magit-clone-url-format "git@%h:%n.git"
   "Format(s) used when turning repository names into urls.
@@ -100,10 +100,12 @@ single static format) or an alist with elements (HOSTNAME
 . FORMAT) mapping hostnames to formats.  When an alist is used,
 the nil key represents the default.  Also see
 `magit-clone-name-alist'."
-  :package-version '(magit . "3.0.0")
+  :package-version '(magit . "3.4.0")
   :group 'magit-commands
-  :type '(choice (string)
-                 (alist :key-type string :value-type string)))
+  :type '(choice (string :tag "Format")
+                 (alist :key-type (choice (string :tag "Host")
+                                          (const :tag "Default" nil))
+                        :value-type (string :tag "Format"))))
 
 ;;; Commands
 



reply via email to

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