diff options
| -rw-r--r-- | lisp/magit-git.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lisp/magit-git.el b/lisp/magit-git.el index 729371d..7a36c08 100644 --- a/lisp/magit-git.el +++ b/lisp/magit-git.el @@ -2994,10 +2994,11 @@ out. Only existing branches can be selected." ;; the value of `default-directory' in that buffer is the same as in ;; the buffer from which completion was invoked. (magit-completing-read prompt (magit-list-module-paths) - (let ((dir default-directory)) - (lambda (module) - (let ((default-directory dir)) - (funcall predicate module)))) + (and predicate + (let ((dir default-directory)) + (lambda (module) + (let ((default-directory dir)) + (funcall predicate module))))) t nil nil (magit-module-at-point predicate))) |