Re: bbdbv3 and wanderlust

On Sun Mar 25 2018 Rob Walker wrote:
> 2.  bbdb-wl.el, within "(defun bbdb/wl-header (header)"
> 
>   (with-current-buffer (get-buffer wl-summary-buffer-name)

This is like a wrapper for the existing code of bbdb/wl-header?

Do you need `get-buffer'?  I'd guess that the following should also
work:

(defun bbdb/wl-header (header)
  (with-current-buffer wl-summary-buffer-name
    (elmo-message-entity-field
     (elmo-message-entity wl-summary-buffer-elmo-folder
                          (wl-summary-message-number))
     (intern (downcase header)) 'string)))