From 449bebe7571bd4dc0fda4abcaffc5563d1dbe60c Mon Sep 17 00:00:00 2001 From: Alex Ott Date: Thu, 17 Jun 2010 13:08:17 +0200 Subject: [PATCH] get true name for directories, that specified by symlinks --- magit.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/magit.el b/magit.el index c03ad68d..eee0efa5 100644 --- a/magit.el +++ b/magit.el @@ -468,7 +468,7 @@ Many Magit faces inherit from this one by default." dirs)))) (defun magit-get-top-dir (cwd) - (let ((cwd (expand-file-name cwd))) + (let ((cwd (expand-file-name (file-truename cwd)))) (when (file-directory-p cwd) (let* ((default-directory cwd) (cdup (magit-git-string "rev-parse" "--show-cdup")))