|
From: | Thomas Baumann |
Subject: | [Orgmode] Re: Please test links |
Date: | Sat, 15 Mar 2008 21:17:32 +0100 |
User-agent: | Gnus/5.13 (Gnus v5.13) Emacs/23.0.60 (gnu/linux) |
quickly installing and learning git.... ... and mhe-links still failing I guess the error comes from (defun org-add-link-props (&rest plist) "Add these properties to the link property list." (let (key value) (while plist (setq key (pop plist) value (pop plist)) (setq org-store-link-plist (plist-put org-store-link-plist key value))))) returning always nil because of (while plist ... thus (defun org-mhe-store-link () "Store a link to an MHE folder or message." (when (or (equal major-mode 'mh-folder-mode) (equal major-mode 'mh-show-mode)) (let ((from (org-mhe-get-header "From:")) (to (org-mhe-get-header "To:")) (message-id (org-mhe-get-header "Message-Id:")) (subject (org-mhe-get-header "Subject:")) link desc) (org-store-link-props :type "mh" :from from :to to :subject subject :message-id message-id) (setq desc (org-email-link-description)) (setq link (org-make-link "mhe:" (org-mhe-get-message-real-folder) "#" (org-remove-angle-brackets message-id))) (org-add-link-props :link link :description desc)))) returns nil and therefore org-store-link will not recognize the successful mhe-link. Cheers Thomas
[Prev in Thread] | Current Thread | [Next in Thread] |