Re: status of bbdb3 support in wl?

Hello,

Randy Bush wrote:
> 
> > You said you get a 'no name' message.
> 
> sorry, it's "No match"
no problem.

 
> > Is that in wl or did you use bbdb alone in that test?
> 
> both
> 
> > What happens when you type M-bbdb and at the search prompt press
> > enter.
> 
> a whole lot of
> 
> Duplicate BBDB record encountered: abuse [6 times]
> Duplicate BBDB record encountered: admin
> ...
I think there is a bbdb variable to allow duplicates. These messages
come slowly, don't they. If you press a key they suddenly speed up.
That is a feature I haven't understood yet.

 
> then the frame looks ok
So you see all your contacts there? That is good, that basically means
bbdb is working. I'm not sure though, why your database isn't
converted.


> save
> exit emacs
> open emacs  ( with (require 'bbdb-wl) or (require 'bbdb-wl) )
> type a name
> No match
My bbdb configuration is a mess at the moment (I experimented a lot in
the last months). But I think the essential parts are:


(require 'bbdb)
(require 'bbdb-mua)
(require 'bbdb-anniv)

; If you don't use gnus etc. you can remove it
(bbdb-initialize 'anniv 'sc 'wl 'gnus)
(bbdb-mua-auto-update-init)

(setq bbdb-complete-mail-allow-cycling t)
(setq bbdb-complete-name-allow-cycling t)
(setq bbdb-completion-type 'primary-or-name)
(setq bbdb-use-pop-up nil)

(add-hook 'wl-message-redisplay-hook 'bbdb-mua-auto-update)

(setq bbdb-mua-auto-update-p 'query)
(setq bbdb-mua-update-interactive-p '(query query))

(setq bbdb-mua-mode-alist
'((wl wl-summary-mode wl-draft-mode mime-view-mode)
 (vm vm-mode vm-virtual-mode vm-summary-mode vm-presentation-mode)
 (gnus gnus-summary-mode gnus-article-mode gnus-tree-mode)
 (rmail rmail-mode rmail-summary-mode)
 (mh mhe-mode mhe-summary-mode mh-folder-mode)
 (message message-mode)
 (mail mail-mode)))



(add-hook 'wl-draft-mode-hook
          (lambda ()
	    (define-key wl-draft-mode-map "\C-i" 'hmw/complete-and-expand-mailabbrev)))


;; Add bbdb defined aliases to mail-aliases
(eval-after-load "bbdb" '(bbdb-mail-aliases))

(add-hook 'wl-draft-mode-hook
  (lambda ()
    (mail-abbrevs-setup)))


;; First try to expand a mail-alias, if that fails
;; use bbdb-complete-mail to grab an email address
;; from bbdb.
(defun hmw/complete-and-expand-mailabbrev ()
  "Complete the mailabbrev before point, and then expand it."
  (interactive "")
  (save-excursion)
  (or (expand-abbrev)
      (bbdb-complete-mail)))


Regards
hmw