aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/replace.el
diff options
context:
space:
mode:
authorJohn Paul Wallington2004-04-11 04:57:44 +0000
committerJohn Paul Wallington2004-04-11 04:57:44 +0000
commitdbed3cd3c02a9528123896291d2e849d37053e48 (patch)
tree08904e91b2e26baa24a095f85b1fc109133a782f /lisp/replace.el
parent00991494b5bf6a389bc715c45e2861869399c0fc (diff)
downloademacs-dbed3cd3c02a9528123896291d2e849d37053e48.tar.gz
emacs-dbed3cd3c02a9528123896291d2e849d37053e48.zip
* replace.el (occur-engine): Distinguish between one and several
matches in the matches per buffer heading.
Diffstat (limited to 'lisp/replace.el')
-rw-r--r--lisp/replace.el5
1 files changed, 3 insertions, 2 deletions
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'."
916 (goto-char headerpt) 916 (goto-char headerpt)
917 (let ((beg (point)) 917 (let ((beg (point))
918 end) 918 end)
919 (insert (format "%d matches for \"%s\" in buffer: %s\n" 919 (insert (format "%d match%s for \"%s\" in buffer: %s\n"
920 matches regexp (buffer-name buf))) 920 matches (if (= matches 1) "" "es")
921 regexp (buffer-name buf)))
921 (setq end (point)) 922 (setq end (point))
922 (add-text-properties beg end 923 (add-text-properties beg end
923 (append 924 (append