[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/consult-recoll 144038cdf9: also search snippets in mess
From: |
ELPA Syncer |
Subject: |
[elpa] externals/consult-recoll 144038cdf9: also search snippets in message mime types |
Date: |
Fri, 19 Aug 2022 22:57:25 -0400 (EDT) |
branch: externals/consult-recoll
commit 144038cdf9fb89c1fcfcda3e75dab1ff9b46b070
Author: jao <jao@gnu.org>
Commit: jao <jao@gnu.org>
also search snippets in message mime types
---
consult-recoll.el | 10 +++++-----
1 file changed, 5 insertions(+), 5 deletions(-)
diff --git a/consult-recoll.el b/consult-recoll.el
index a2a09e8e22..85ce1432ed 100644
--- a/consult-recoll.el
+++ b/consult-recoll.el
@@ -142,10 +142,9 @@ Set to nil to use the default 'title (path)' format."
(and (derived-mode-p 'org-mode)
(let ((txt (replace-regexp-in-string "\\]\\].+" "" txt)))
(search-forward txt nil t)))
- (and (string= mime "text/html")
- (let ((mid (/ (length txt) 2)))
- (or (search-forward (substring txt 0 mid) nil t)
- (search-forward (substring txt mid) nil t)))))
+ (let ((mid (/ (length txt) 2)))
+ (or (search-forward (substring txt 0 mid) nil t)
+ (search-forward (substring txt mid) nil t))))
(goto-char (match-beginning 0))
(when (derived-mode-p 'org-mode) (org-reveal))))))
@@ -162,7 +161,8 @@ Set to nil to use the default 'title (path)' format."
(if (not consult-recoll-inline-snippets)
(funcall open url)
(funcall open url (consult-recoll--candidate-page candidate))
- (when (string-prefix-p "text/" mime)
+ (when (or (string-prefix-p "text/" mime)
+ (string-prefix-p "message/" mime))
(consult-recoll--search-snippet candidate mime))))))
(defconst consult-recoll--line-rx
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/consult-recoll 144038cdf9: also search snippets in message mime types,
ELPA Syncer <=