mirror/org-mode
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-11-21 06:55:35 +00:00
Code

Fix bug in org-mhe.el.

Browse Source 
Patch from Thomas Baumann.
This commit is contained in:
Carsten Dominik 2008-05-18 07:02:04 +02:00
parent 21678fb411
commit f4b66bd8fc
2 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/ChangeLog
View File

@ -1,3 +1,7 @@
2008-05-18 Carsten Dominik <dominik@science.uva.nl>
* org-mhe.el (org-mhe-follow-link): Fix bug in mhe searches.
2008-05-16 Carsten Dominik <dominik@science.uva.nl>
* org-faces.el (org-column): Document how this face is being used

6
lisp/org-mhe.el
View File

@ -204,8 +204,10 @@ folders."
(not (org-mhe-get-message-real-folder)))
(kill-this-buffer)
(mh-search "+" (list "--message-id" article))))
(mh-search "+" (funcall mh-search-regexp-builder
(list (cons 'message-id article)))))
(if mh-search-regexp-builder
(mh-search "+" (funcall mh-search-regexp-builder
(list (cons 'message-id article))))
(mh-search "+" article)))
(if (org-mhe-get-message-real-folder)
(mh-show-msg 1)
(kill-this-buffer)