From: Eric Abrahamsen <eric@ericabrahamsen.net>
Date: Sun, 7 Feb 2021 21:46:50 +0000 (-0800)
Subject: Fix namazu search result parsing in gnus-search
X-Git-Tag: emacs-28.0.90~3881
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=fa735ebc0cd4fbb96ae05b494f7728f5707a8536;p=emacs.git

Fix namazu search result parsing in gnus-search

* lisp/gnus/gnus-search.el (gnus-search-indexed-extract): This method
is documented to leave point at the end of the extracted search
result. The namazu implementation wasn't doing that.
---

diff --git a/lisp/gnus/gnus-search.el b/lisp/gnus/gnus-search.el
index 0783d34733a..21602f825c1 100644
--- a/lisp/gnus/gnus-search.el
+++ b/lisp/gnus/gnus-search.el
@@ -1514,6 +1514,7 @@ Namazu provides a little more information, for instance a score."
   (when (re-search-forward
 	 "^\\([0-9,]+\\.\\).*\\((score: \\([0-9]+\\)\\))\n\\([^ ]+\\)"
 	 nil t)
+    (forward-line 1)
     (list (match-string 4)
 	  (match-string 3))))