branch: elpa/magit
commit e5c0399091aaa9f0dd5a1b06a1207d6f65a93a32
Author: Jonas Bernoulli <[email protected]>
Commit: Jonas Bernoulli <[email protected]>

    magit-worktree-delete: Do not list worktree at point twice
---
 lisp/magit-worktree.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/magit-worktree.el b/lisp/magit-worktree.el
index 75af6a36840..2340811779d 100644
--- a/lisp/magit-worktree.el
+++ b/lisp/magit-worktree.el
@@ -160,7 +160,7 @@ Interactively, use 
`magit-read-worktree-directory-function'."
 The primary worktree cannot be deleted."
   (interactive
    (list (magit-completing-read "Delete worktree"
-                                (cdr (magit-list-worktrees))
+                                (mapcar #'car (cdr (magit-list-worktrees)))
                                 nil t nil nil
                                 (magit-section-value-if 'worktree))))
   (if (file-directory-p (expand-file-name ".git" worktree))

Reply via email to