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 ()