From: Mattias Engdegård <mattiase@acm.org>
Date: Sat, 31 Jul 2021 20:37:03 +0000 (+0200)
Subject: Occur-mode multi-line match property gap filling
X-Git-Tag: emacs-28.0.90~1617
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6413f08887ccb4fa8049f4665bba4f77368f15c6;p=emacs.git

Occur-mode multi-line match property gap filling

When an occur-mode regexp matches across multiple lines, the spacing
prefixes inserted between each did not have the `occur-target`
property which is essential for jumping to the corresponding place in
the target buffer.  This prevented next-error and previous-error
from working.

* lisp/replace.el (occur-engine): Put the `occur-target` property on
the continuation prefix to avoid the gap.
---

diff --git a/lisp/replace.el b/lisp/replace.el
index d0c63669159..148b7ce48b1 100644
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -2089,8 +2089,10 @@ See also `multi-occur'."
 			        "\n"
 			        (if prefix-face
 				    (propertize
-				     "\n       :" 'font-lock-face prefix-face)
-				  "\n       :")
+				     "\n       :" 'font-lock-face prefix-face
+                                     'occur-target markers)
+                                  (propertize
+				   "\n       :" 'occur-target markers))
                                 ;; Add mouse face in one section to
                                 ;; ensure the prefix and the string
                                 ;; get a contiguous highlight.