summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorChunyang Xu <mail@xuchunyang.me>2017-05-29 17:03:24 +0800
committerKyle Meyer <kyle@kyleam.com>2017-05-29 08:43:06 -0400
commit1fbbce4d81be0eb251b1aa05312016ad58ffa7f1 (patch)
treefbb22457d2e590bb626f63560a18e840c98fb854
parent1afcf2c9aaf2c97cde0cbd94141eefe4d376166d (diff)
downloadorg-mode-1fbbce4d81be0eb251b1aa05312016ad58ffa7f1.tar.gz
org-git-link.el: Fix `org-git-find-gitdir'
* contrib/lisp/org-git-link.el (org-git-find-gitdir): Expand abbreviated directory name. TINYCHANGE
-rw-r--r--contrib/lisp/org-git-link.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/lisp/org-git-link.el b/contrib/lisp/org-git-link.el
index 65f25b2..0028daf 100644
--- a/contrib/lisp/org-git-link.el
+++ b/contrib/lisp/org-git-link.el
@@ -126,7 +126,7 @@
the path. Example: (org-git-find-gitdir
\"~/gitrepos/foo/bar.txt\") returns
'(\"/home/user/gitrepos/.git\" \"foo/bar.txt\"). When not in a git repository, return nil."
- (let ((dir (file-name-directory path))
+ (let ((dir (expand-file-name (file-name-directory path)))
(relpath (file-name-nondirectory path)))
(catch 'toplevel
(while (not (file-exists-p (expand-file-name ".git" dir)))