* magit.el (magit-read-top-dir): Also ask when top-dir can't be found.

This commit is contained in:
Marius Vollmer 2008-08-12 13:52:16 +03:00
parent 7e251bb8ce
commit 659480b4e3

View file

@ -98,7 +98,7 @@
(defun magit-read-top-dir (prefix)
(let ((dir (magit-get-top-dir default-directory)))
(if prefix
(if (or (not dir) prefix)
(magit-get-top-dir (read-directory-name "Git repository: " dir))
dir)))