diff options
| author | Bastien Guerry <bzg@gnu.org> | 2020-12-13 13:44:15 +0100 |
|---|---|---|
| committer | Bastien Guerry <bzg@gnu.org> | 2020-12-13 13:44:15 +0100 |
| commit | f22856a5c54d99867cd24c08a14bbda23d5c6229 (patch) | |
| tree | b6bd688963531eccb8b9d18195df0edfc34ba59d /lisp/org/ol-rmail.el | |
| parent | 6aa9fe3e1b4052b2acde86404a90e35893ebfa00 (diff) | |
| download | emacs-f22856a5c54d99867cd24c08a14bbda23d5c6229.tar.gz emacs-f22856a5c54d99867cd24c08a14bbda23d5c6229.tar.bz2 emacs-f22856a5c54d99867cd24c08a14bbda23d5c6229.zip | |
Update to Org 9.4.1
Diffstat (limited to 'lisp/org/ol-rmail.el')
| -rw-r--r-- | lisp/org/ol-rmail.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/org/ol-rmail.el b/lisp/org/ol-rmail.el index cad8eaa169a..e43fc932ee2 100644 --- a/lisp/org/ol-rmail.el +++ b/lisp/org/ol-rmail.el @@ -43,7 +43,9 @@ (defvar rmail-file-name) ; From rmail.el ;; Install the link type -(org-link-set-parameters "rmail" :follow #'org-rmail-open :store #'org-rmail-store-link) +(org-link-set-parameters "rmail" + :follow #'org-rmail-open + :store #'org-rmail-store-link) ;; Implementation (defun org-rmail-store-link () @@ -75,7 +77,7 @@ (rmail-show-message rmail-current-message) link))))) -(defun org-rmail-open (path) +(defun org-rmail-open (path _) "Follow an Rmail message link to the specified PATH." (let (folder article) (if (not (string-match "\\`\\([^#]+\\)\\(#\\(.*\\)\\)?" path)) |