[Emacs-diffs] emacs-25 5eafc0a: * lisp/replace.el (occur-engine): Count matches in empty lines.

[Juri Linkov]

branch: emacs-25
commit 5eafc0a7a910db0accac162a59f4709fc2ecec4c
Author: Juri Linkov <address@hidden>
Commit: Juri Linkov <address@hidden>

    * lisp/replace.el (occur-engine): Count matches in empty lines.
    
    (Bug#22062)
---
 lisp/replace.el |    3 +++
 1 files changed, 3 insertions(+), 0 deletions(-)

diff --git a/lisp/replace.el b/lisp/replace.el
index 21a830d..54b3a71 100644
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -1577,6 +1577,9 @@ See also `multi-occur'."
                    ;; Highlight the matches
                    (let ((len (length curstring))
                          (start 0))
+                     ;; Count empty lines that don't use next loop (Bug#22062).
+                     (when (zerop len)
+                       (setq matches (1+ matches)))
                      (while (and (< start len)
                                  (string-match regexp curstring start))
                        (setq matches (1+ matches))