[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: wanderlust install question
Hi Thomas,
At Wed, 08 Jan 2014 21:48:08 -0500,
Thomas Narten wrote:
>
> Hi Erik.
>
> > Or do you mean you want to wrap other people’s email? For that I use
> > this handy bit of code:
>
> Yes, this is what I'm after - reformating other people's mail that
> contain long lines.
>
> Your code snippet appears to be the same as what I pulled from
> http://emacs-fu.blogspot.com/2010/02/i-have-been-using-wanderlust-e-mail.html.
>
> I haven't looked into it deeply, but I am running into occasional
> messages it doesn't fix up, and applying the re-format is effectively
> a no-op.
Yes, I stole it from the mailing list a long time ago. :) It works for
me all the time, though, as far as I can tell.
> […]
>
>
> Yes, this does the trick. After visiting multiple folders, I can
> "switch-to-buffer <Summary:...>" to get back to them quickly.
>
> Before I start tweaking things, what I'd like to do is have a global
> key stroke that prompts me (with completion) for the name of available
> Summaries, and then goes directly there, without me having to
> first go to the Folder page.
>
> I don't see anything right off that does that. Skimming the
> documentation, the only way I see to go visit/create a Summary for the first
> time is to start from the Folder buffer.
No that I know of, but searching with M-x wl--buffer yields some
functions that might help you, wl-summary-next-buffer and
wl-summary-previous-buffer. Modifying them slightly:
(defun wl-summary-switch-buffer ()
(interactive)
(let* ((buffers (sort (wl-collect-summary)
(lambda (buffer1 buffer2)
(string-lessp (buffer-name buffer1)
(buffer-name buffer2)))))
(buffers-alist (mapcar (lambda (b) (list (buffer-name b) b)) buffers))
(buffer-names (mapcar 'buffer-name buffers))
(chosen-name (ido-completing-read "Buffer: " buffer-names))
(chosen-buffer (assoc-string chosen-name buffer-alist)))
(switch-to-buffer chosen-buffer)))
best, Erik
--
Sent from my free software system <http://fsf.org/>.