alx/mu4e
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Merge pull request #920 from andersjohansson/orglinkfix

Browse Source 
mu4e: Only call old org-link API if new unavailable
This commit is contained in:
Dirk-Jan C. Binnema
2016-09-29 10:09:57 +03:00
committed by GitHub
parent 62370afed9 b885dd308e
commit 9fd6d36963
1 changed files with 3 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
mu4e/org-mu4e.el
View File

@ -117,16 +117,14 @@ Example usage:
:description (funcall org-mu4e-link-desc-func msg)) :description (funcall org-mu4e-link-desc-func msg))
link)))) link))))
(org-add-link-type "mu4e" 'org-mu4e-open)
(add-hook 'org-store-link-functions 'org-mu4e-store-link)
;; org-add-link-type is obsolete as of org-mode 9. ;; org-add-link-type is obsolete as of org-mode 9.
;; Instead we will use the org-link-set-parameters method ;; Instead we will use the org-link-set-parameters method
(if (fboundp 'org-link-set-parameters) (if (fboundp 'org-link-set-parameters)
(org-link-set-parameters "mu4e" (org-link-set-parameters "mu4e"
:follow #'org-mu4e-open :follow #'org-mu4e-open
:store #'org-mu4e-store-link)) :store #'org-mu4e-store-link)
(org-add-link-type "mu4e" 'org-mu4e-open)
(add-hook 'org-store-link-functions 'org-mu4e-store-link))
(defun org-mu4e-open (path) (defun org-mu4e-open (path)
"Open the mu4e message (for paths starting with 'msgid:') or run "Open the mu4e message (for paths starting with 'msgid:') or run