Commit d1aefc52e4f3

Vincent Demeester <vincent@sbr.pm>
2019-02-05 18:25:29
setup-org: add an export function for `gh` link typo
Signed-off-by: Vincent Demeester <vincent@sbr.pm>
main
1 parent 6e1703d
Changed files (1)
lisp
setup-org.el
lisp/setup-org.el
@@ -193,6 +193,11 @@ like this : [[pt:REGEXP:FOLDER]]"
 
   (org-link-set-parameters "gh"
                            :follow #'my/follow-gh-link
+                           :export (lambda (path desc backend)
+                                     (setq expressions (split-string path "#"))
+                                     (setq project (nth 0 expressions))
+                                     (setq issue (nth 1 expressions))
+                                     (format "https://github.com/%s/issues/%s" project issue))
                            :face '(:foreground "DimGrey" :underline t))
   (defun my/follow-gh-link (issue)
     "Browse github issue/pr specified"