[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/ebdb 274273d 2/2: If gnus-search is available, add auto
From: |
Eric Abrahamsen |
Subject: |
[elpa] externals/ebdb 274273d 2/2: If gnus-search is available, add auto-completion to it, bump 0.6.20 |
Date: |
Mon, 2 Nov 2020 15:17:13 -0500 (EST) |
branch: externals/ebdb
commit 274273df64919d0d7300cfff49fccb8a707cab1e
Author: Eric Abrahamsen <eric@ericabrahamsen.net>
Commit: Eric Abrahamsen <eric@ericabrahamsen.net>
If gnus-search is available, add auto-completion to it, bump 0.6.20
* ebdb-gnus.el (ebdb-insinuate-gnus): If `gnus-search-contact-tables'
is available, push the ebdb-hashtable onto it.
* ebdb.el: Call this 0.6.20.
---
ebdb-gnus.el | 7 +++++++
ebdb.el | 2 +-
2 files changed, 8 insertions(+), 1 deletion(-)
diff --git a/ebdb-gnus.el b/ebdb-gnus.el
index e4972fe..7a6f0a6 100644
--- a/ebdb-gnus.el
+++ b/ebdb-gnus.el
@@ -357,6 +357,13 @@ composed to a certain record."
(define-key gnus-summary-mode-map ";" ebdb-mua-keymap)
(define-key gnus-article-mode-map ";" ebdb-mua-keymap)
+ ;; Versions of Gnus with the gnus-search.el library allow us to
+ ;; perform contact auto-completion within search queries.
+ (when (boundp 'gnus-search-contact-tables)
+ (add-hook 'ebdb-after-load-hook
+ (lambda ()
+ (push ebdb-hashtable gnus-search-contact-tables))))
+
;; Set up user field for use in `gnus-summary-line-format'
;; (1) Big solution: use whole name
(if ebdb-mua-summary-unify-format-letter
diff --git a/ebdb.el b/ebdb.el
index 5696ffa..b3a221e 100644
--- a/ebdb.el
+++ b/ebdb.el
@@ -2,7 +2,7 @@
;; Copyright (C) 2016-2020 Free Software Foundation, Inc.
-;; Version: 0.6.19
+;; Version: 0.6.20
;; Package-Requires: ((emacs "25.1") (cl-lib "0.5") (seq "2.15"))
;; Maintainer: Eric Abrahamsen <eric@ericabrahamsen.net>