gwh/slackbuilds
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Ensure trailing slash for default-directory.

Browse source
This commit is contained in:
Leo 2010-12-01 08:24:56 +00:00 committed by Phil Jackson
parent 327f0af4f8
commit 03bcfb0158
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
magit.el
View file

@ -715,7 +715,7 @@ Many Magit faces inherit from this one by default."
(defun magit-get-top-dir (cwd)
(let ((cwd (expand-file-name (file-truename cwd))))
(when (file-directory-p cwd)
(let* ((default-directory cwd)
(let* ((default-directory (file-name-as-directory cwd))
(cdup (magit-git-string "rev-parse" "--show-cdup")))
(when cdup
(file-name-as-directory (expand-file-name cdup cwd)))))))