diff options
| -rw-r--r-- | spacemacs.el | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/spacemacs.el b/spacemacs.el index 1d9cb34..14e11e5 100644 --- a/spacemacs.el +++ b/spacemacs.el @@ -717,6 +717,20 @@ This is the place where most of your configurations should be done. Unless it is (key-chord-define-global "qe" (lambda () (interactive) (save-some-buffers 1))) + + + (defun git-link-savannah (hostname dirname filename _branch commit start _end) + (let ((project-name (cadr (split-string dirname "/")))) + (format "https://%s/cgit/%s.git/tree/%s?id=%s#n%s" + hostname + project-name + filename + commit + start))) + + (setq git-link-remote-alist + (cons '("savannah" git-link-savannah) + git-link-remote-alist)) t) (defun dotspacemacs/emacs-custom-settings () |