[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/gnorb 4bb8cd2 413/449: [gnorb] Check message-alternativ
From: |
Stefan Monnier |
Subject: |
[elpa] externals/gnorb 4bb8cd2 413/449: [gnorb] Check message-alternative-emails in helm registry search |
Date: |
Fri, 27 Nov 2020 23:16:23 -0500 (EST) |
branch: externals/gnorb
commit 4bb8cd25f00d44ee0867d8e98439e190006ad313
Author: Eric Abrahamsen <eric@ericabrahamsen.net>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>
[gnorb] Check message-alternative-emails in helm registry search
* packages/gnorb/gnorb-helm.el (gnorb-helm-gnus-registry-candidates):
In addition to gnus-ignored-from-addresses.
---
gnorb-helm.el | 14 +++++++++++---
1 file changed, 11 insertions(+), 3 deletions(-)
diff --git a/gnorb-helm.el b/gnorb-helm.el
index bcae4f9..8fa6309 100644
--- a/gnorb-helm.el
+++ b/gnorb-helm.el
@@ -34,13 +34,20 @@
(defun gnorb-helm-gnus-registry-candidates ()
"Return a list of candidates from the Gnus registry."
(let ((check
- (when gnus-ignored-from-addresses
+ (when (or gnus-ignored-from-addresses
+ message-alternative-emails)
(cond ((functionp gnus-ignored-from-addresses)
(lambda (adr) (funcall gnus-ignored-from-addresses adr)))
((stringp gnus-ignored-from-addresses)
(lambda (adr)
(string-match-p
- gnus-ignored-from-addresses adr))))))
+ gnus-ignored-from-addresses adr)))
+ ((functionp message-alternative-emails)
+ (lambda (adr) (funcall message-alternative-emails adr)))
+ ((stringp message-alternative-emails)
+ (lambda (adr)
+ (string-match-p
+ message-alternative-emails adr))))))
ret from recipient subject group)
(maphash
(lambda (msg-id data)
@@ -52,7 +59,8 @@
"%s: %s" ; display
(if (and check
(funcall check from))
- (mapconcat #'identity recipient " ")
+ (concat
+ "To: " (mapconcat #'identity recipient " "))
from)
subject)
(cons msg-id group)) ; real
- [elpa] externals/gnorb 0b503b4 436/449: [gnorb] Update copyright years, (continued)
- [elpa] externals/gnorb 0b503b4 436/449: [gnorb] Update copyright years, Stefan Monnier, 2020/11/27
- [elpa] externals/gnorb 03ba6e5 412/449: [gnorb] Don't use make-temp-name for registry searches, Stefan Monnier, 2020/11/27
- [elpa] externals/gnorb 5bac9a7 428/449: [gnorb] Compiler-complaint fixes, Stefan Monnier, 2020/11/27
- [elpa] externals/gnorb 0856e48 446/449: [gnorb] Add code path for users with nnselect available, Stefan Monnier, 2020/11/27
- [elpa] externals/gnorb 8623bd0 439/449: [gnorb] Further avoid creating registry entries, bump to 1.6.7, Stefan Monnier, 2020/11/27
- [elpa] externals/gnorb bd97393 420/449: gnorb: Fix bug in post-message-send action triggering, Stefan Monnier, 2020/11/27
- [elpa] externals/gnorb 71cf0ef 403/449: Allow short-circuiting the nnir search, Stefan Monnier, 2020/11/27
- [elpa] externals/gnorb 6d88203 432/449: [gnorb] Add a gnus-shutdown to clean up gnorb hooks, bump to 1.6.4, Stefan Monnier, 2020/11/27
- [elpa] externals/gnorb 2ca09f4 421/449: gnorb: Fix link following, bump to 1.5.6, Stefan Monnier, 2020/11/27
- [elpa] externals/gnorb 86b870f 429/449: [gnorb] Replace gnus-buffer-exists-p with gnus-buffer-live-p, Stefan Monnier, 2020/11/27
- [elpa] externals/gnorb 4bb8cd2 413/449: [gnorb] Check message-alternative-emails in helm registry search,
Stefan Monnier <=
- [elpa] externals/gnorb 840093b 411/449: [gnorb] Don't use string-trim with optional args, Stefan Monnier, 2020/11/27
- [elpa] externals/gnorb 5e8b0c2 414/449: [gnorb] Fix handling of region-bounds return value, Stefan Monnier, 2020/11/27
- [elpa] externals/gnorb 183cf9c 435/449: [gnorb] Fix dumb typo in 07214d9e4, Stefan Monnier, 2020/11/27
- [elpa] externals/gnorb f383a7e 416/449: [gnorb] Require gnorb-org within gnorb-trigger-todo-action, Stefan Monnier, 2020/11/27
- [elpa] externals/gnorb 9adc9dd 427/449: [gnorb] Add nnselect method of getting an article's "real" group, Stefan Monnier, 2020/11/27
- [elpa] externals/gnorb 3fb0aed 438/449: [gnorb] Fixes to link scanning, bump to 1.6.6, Stefan Monnier, 2020/11/27
- [elpa] externals/gnorb 5692b47 448/449: [gnorb] Finish refactoring for nnselect, bump to 1.6.9, Stefan Monnier, 2020/11/27
- [elpa] externals/gnorb 6174d5a 410/449: [gnorb] More little tweaks to registry searching, bump to 1.5.2, Stefan Monnier, 2020/11/27
- [elpa] externals/gnorb 46b72b2 415/449: [gnorb] Bump version to 1.5.3, Stefan Monnier, 2020/11/27
- [elpa] externals/gnorb c4aa1d5 441/449: [gnorb] Improve customization type for gnorb-gnus-sent-groups, Stefan Monnier, 2020/11/27