# HG changeset patch # User John Paul Wallington # Date 1089393419 0 # Node ID a4c0ce40be3d13d99427554f386f129dc33e4085 # Parent aa091bac0a8a00a69cc59fb4a08461354507fd6e (reb-update-overlays): Distinguish between one and several matches in message. diff -r aa091bac0a8a -r a4c0ce40be3d lisp/emacs-lisp/re-builder.el --- a/lisp/emacs-lisp/re-builder.el Fri Jul 09 16:57:05 2004 +0000 +++ b/lisp/emacs-lisp/re-builder.el Fri Jul 09 17:16:59 2004 +0000 @@ -670,9 +670,10 @@ (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)" "")))