.emacs.el

(defun git-link-cs-stash (hostname dirname filename branch commit start end)
  (cl-destructuring-bind (project-name repo-root) (split-string dirname "/")
    (format "http://stash.cs.sys/projects/%s/repos/%s/browse/%s#%s"
            project-name
            repo-root
            filename
            (if end
                (format "%s-L%s" start end)
              (format "%s" start)))))

(eval-after-load 'git-link
  '(add-to-list 'git-link-remote-alist
                '("cs-stash" git-link-cs-stash)))