summaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorMartin Polden <martin.polden@gmail.com>2014-07-04 11:04:56 +0200
committerMartin Polden <martin.polden@gmail.com>2014-07-04 11:04:56 +0200
commit975ba8f74cd5bd91e34bbfd863c707cb17c427e1 (patch)
treea0356fd0f3c7a725f8aa41310695414476db1433 /lisp
parent03969dea69150850d3a417650a5d0c7a6ea74476 (diff)
Show basename in git-root
Diffstat (limited to 'lisp')
-rw-r--r--lisp/init-git.el8
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/init-git.el b/lisp/init-git.el
index ab9384a..9bbf000 100644
--- a/lisp/init-git.el
+++ b/lisp/init-git.el
@@ -7,6 +7,7 @@
(require 'git-rebase-mode)
(require 'gitconfig-mode)
(require 'gitignore-mode)
+(require 'vc-git)
;; use appropiate git-mode for .gitconfig and .gitignore extensions
(add-to-list 'auto-mode-alist '("\\.gitignore\\'" . gitignore-mode))
@@ -55,8 +56,11 @@
(if buffer-file-name
(let ((git-root (vc-git-root buffer-file-name)))
(if git-root
- (message "In git repository: %s" git-root)
- (message "No git repository found for file")))
+ (let ((git-root-file-name (directory-file-name git-root)))
+ (message "git repository: %s (%s)"
+ (file-name-nondirectory git-root-file-name)
+ git-root-file-name))
+ (message "%s is not in a git repository" buffer-file-name)))
(message "Buffer is not visiting a file")))
;; show current git repo