>From f3b857e5d021036b1bb7f1d7dcf77e0ab99cb64d Mon Sep 17 00:00:00 2001 From: Eric Abrahamsen Date: Wed, 4 Nov 2020 15:00:22 -0800 Subject: [PATCH] Add Gnus search query auto-completion for BBDB contacts * lisp/bbdb-gnus.el (bbdb-insinuate-gnus): Add bbdb-hashtable to `gnus-search-contact-tables', if that option is defined. --- lisp/bbdb-gnus.el | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/lisp/bbdb-gnus.el b/lisp/bbdb-gnus.el index c2ac987..043fe8b 100644 --- a/lisp/bbdb-gnus.el +++ b/lisp/bbdb-gnus.el @@ -43,6 +43,10 @@ Do not call this in your init file. Use `bbdb-initialize'." ;;`gnus-article-read-summary-keys' restores the window configuration. (define-key gnus-summary-mode-map ";" 'bbdb-mua-edit-field-sender) (define-key gnus-article-mode-map ";" 'bbdb-mua-edit-field-sender) + (when (boundp 'gnus-search-contact-tables) + (add-hook 'bbdb-after-read-db-hook + (lambda () + (push bbdb-hashtable gnus-search-contact-tables)))) ;; Do we need keybindings for more commands? Suggestions welcome. ;; (define-key gnus-summary-mode-map ":" 'bbdb-mua-display-records) ;; (define-key gnus-summary-mode-map "'" 'bbdb-mua-display-recipients) -- 2.29.2