|
|
- ;;; ol-message.el --- Support for links to mail message
-
- ;;; Commentary:
-
- ;;; Code:
-
- (require 'ol)
-
- (defun org-message-command (link)
- "The Emacs command to be used to open a message in Mail via LINK."
- (shell-command (format "open \"message:%s\"" link))
- (message "Opening message in Mail..."))
-
- (org-link-set-parameters "message"
- :follow #'org-message-command)
-
- (provide 'ol-message)
- ;;; ol-message.el ends here
|