* replace.el (occur-engine): Distinguish between one and several

matches in the matches per buffer heading.

2 files changed, 8 insertions, 2 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6ee9530616b..15736b40b37 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2004-04-11  John Paul Wallington  <jpw@gnu.org>
+
+        * replace.el (occur-engine): Distinguish between one and several
+        matches in the matches per buffer heading.
+
 2004-04-11  Kim F. Storm  <storm@cua.dk>
 
         * ido.el (ido-confirm-unique-completion): New defcustom.
diff --git a/lisp/replace.el b/lisp/replace.el
index d8d642261e4..2d26cb5cc66 100644
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -916,8 +916,9 @@ See also `multi-occur'."
                 (goto-char headerpt)
                 (let ((beg (point))
                       end)
-                  (insert (format "%d matches for \"%s\" in buffer: %s\n"
-                                  matches regexp (buffer-name buf)))
+                  (insert (format "%d match%s for \"%s\" in buffer: %s\n"
+                                  matches (if (= matches 1) "" "es")
+                                  regexp (buffer-name buf)))
                   (setq end (point))
                   (add-text-properties beg end
                                        (append