1 Oct 2007 03:25
Fix to org-nnml.el
John Wiegley <johnw <at> newartisans.com>
2007-10-01 01:25:03 GMT
2007-10-01 01:25:03 GMT
I found that org-nnml doesn't quite work when you go to visit the links! This
is fixed in version 1.1, pasted below. To make this work, make sure to search
through your org-mode file for occurences of "nnml://" to "nnml:".
John
;;; org-nnml.el - Support for links to nnml messages by Message-ID
;; version 1.1, by John Wiegley <johnw <at> gnu.org>
(require 'org)
(eval-when-compile
(require 'nnml)
(require 'gnus-sum))
(org-add-link-type "nnml" 'org-nnml-open)
(add-hook 'org-store-link-functions 'org-nnml-store-link)
(defun org-nnml-open (message-id)
"Visit the nnml message with the given Message-ID."
(let ((info (nnml-find-group-number message-id)))
(gnus-summary-read-group (concat "nnml:" (car info)) 100 t)
(gnus-summary-goto-article (cdr info) nil t)))
(defun org-nnml-store-link ()
"Store a link to an nnml e-mail message by Message-ID."
(when (memq major-mode '(gnus-summary-mode gnus-article-mode))
(and (eq major-mode 'gnus-article-mode) (gnus-article-show-summary))
(Continue reading)
RSS Feed