diff options
| -rw-r--r-- | eb.el | 12 |
1 files changed, 11 insertions, 1 deletions
@@ -73,12 +73,22 @@ (defun eb-dired () "Open the root of the current project with `dired'." (interactive) + (require 'project) + (when eb--list-buffers (quit-window)) (let ((project-root (project-root (project-current)))) (if (and (eq major-mode 'dired-mode) (equal default-directory project-root)) (bury-buffer) (dired project-root)))) ;;;###autoload +(defun eb-vc () + "Open version control for project." + (interactive) + (require 'projectile) + (when eb--list-buffers (quit-window)) + (call-interactively #'projectile-vc)) + +;;;###autoload (defun eb-quit-or-bury () "Quit window or bury buffer." (interactive) @@ -116,7 +126,7 @@ :label "Compile" :help "Compile project") (tool-bar-local-item "search-replace" #'projectile-grep 'grep map :label "Grep" :help "Grep project") - (tool-bar-local-item "connect" #'projectile-vc 'vc map + (tool-bar-local-item "connect" #'eb-vc 'vc map :label "Version Control" :help "Open project version control") (define-key-after map [separator-2] menu-bar-separator) |