1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-13 09:30:24 -08:00

(reb-update-overlays): Distinguish between one and several matches in message.

This commit is contained in:
John Paul Wallington 2004-07-09 17:16:59 +00:00
parent 02c04e6f82
commit 7c20a7a9bb

View file

@ -670,9 +670,10 @@ If SUBEXP is non-nil mark only the corresponding sub-expressions."
(overlay-put overlay 'priority i)))
(setq i (1+ i))))))
(let ((count (if subexp submatches matches)))
(message"%s %smatch(es)%s"
(message"%s %smatch%s%s"
(if (= 0 count) "No" (int-to-string count))
(if subexp "subexpression " "")
(if (= 1 count) "" "es")
(if (and reb-auto-match-limit
(= reb-auto-match-limit count))
" (limit reached)" "")))