branch: master
commit eeb441f1559359655faee5eb87d9d0b88c4c732c
Author: Michael Heerdegen <michael_heerde...@web.de>
Commit: Michael Heerdegen <michael_heerde...@web.de>

    [el-search] Fix a highlighting corner case
    
    * packages/el-search/el-search.el (el-search-pattern-backward):
    Highlight other matches also when last command was 'el-search-pattern'
    but search had failed.
---
 packages/el-search/el-search.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/packages/el-search/el-search.el b/packages/el-search/el-search.el
index b70c79b..1920d2a 100644
--- a/packages/el-search/el-search.el
+++ b/packages/el-search/el-search.el
@@ -3387,7 +3387,7 @@ See the command `el-search-pattern' for more information."
         (setf (el-search-object-last-match el-search--current-search)
               (copy-marker (point)))
         (el-search-hl-sexp)
-        (unless (eq last-command 'el-search-pattern)
+        (unless (and (eq last-command 'el-search-pattern) el-search--success)
           (el-search-hl-other-matches (el-search--current-matcher)))
         (setq el-search--success t))
     (el-search--unless-no-buffer-match

Reply via email to