David Maus wrote:
> Not yet, but sounds like a nice idea, so I'll give it a try.
That was easier than I thought: See attached file
namazu-wl-message-open.el.
It provides the command `dmj/namazu-wl-message-open' that can be
called in a namazu search result buffer which tries to determine the
folder name of a search result and opens the message in Wanderlust.
Mapping of files and folders is done using the customization variable
`dmj/namazu-wl-message-folder-rule-list': A list of cons with a
regular expression in car and replace string in cdr.
Example:
(setq dmj/namazu-wl-message-folder-rule-list
'(("/home/dmaus/mail/\\([^/]+\\)/\\(cur\\|new\\)/.+" ".\\1")
("/home/dmaus/.elmo/cache/\\([0-9A-F]\\{2\\}\\)/.+" "'cache/\\1")))
You can bind it to a key, e.g. C-c o
(add-hook 'namazu-mode-hook
(lambda ()
(define-key namazu-mode-map
(kbd "C-c o") 'dmj/namazu-wl-message-open)))
HTH
-- David
--
OpenPGP... 0x99ADB83B5A4478E6
Jabber.... dmjena@jabber.org
Email..... dmaus@ictsoc.de
Attachment:
namazu-wl-message-open.el
Description: Binary data
Attachment:
pgpOrW5b5WoZ6.pgp
Description: PGP signature