branch: elpa/magit
commit 21dd680080af75fc181c74cc2f6aedf4dbe953fb
Author: Jonas Bernoulli <[email protected]>
Commit: Jonas Bernoulli <[email protected]>
magit-worktree-move: Call read-directory-name directly
No longer use `magit-worktree-read-directory-name-function', which
is still used by commands that create new worktrees. A fancy user
function suitable for worktree creation is likely contra-productive
when moving an existing worktree.
---
lisp/magit-worktree.el | 3 +--
1 file changed, 1 insertion(+), 2 deletions(-)
diff --git a/lisp/magit-worktree.el b/lisp/magit-worktree.el
index 35a7f5bcdec..bfc7b5b2fa4 100644
--- a/lisp/magit-worktree.el
+++ b/lisp/magit-worktree.el
@@ -86,8 +86,7 @@ Used by `magit-worktree-checkout' and
`magit-worktree-branch'."
(cdr (magit-list-worktrees))
nil t nil nil
(magit-section-value-if 'worktree))
- (funcall magit-worktree-read-directory-name-function
- "Move worktree to: ")))
+ (read-directory-name "Move worktree to: ")))
(if (file-directory-p (expand-file-name ".git" worktree))
(user-error "You may not move the main working tree")
(let ((preexisting-directory (file-directory-p directory)))
