diff options
| author | John Paul Wallington <jpw@pobox.com> | 2004-08-30 19:05:10 +0000 |
|---|---|---|
| committer | John Paul Wallington <jpw@pobox.com> | 2004-08-30 19:05:10 +0000 |
| commit | f04232c3c2242acb4c2a188565a61cf3a986f3e8 (patch) | |
| tree | 33a3a1fb469f335b4aa0d7b85c252640d7f90bb7 /lisp/textmodes/tex-mode.el | |
| parent | 11715f92de50ee7c004386d9de00b7f3e2df633b (diff) | |
| download | emacs-f04232c3c2242acb4c2a188565a61cf3a986f3e8.tar.gz | |
(tex-validate-buffer): Use distinct strings rather than
programatically constructing message.
Diffstat (limited to 'lisp/textmodes/tex-mode.el')
| -rw-r--r-- | lisp/textmodes/tex-mode.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el index 115dd6f88f0..1c4b89f0a62 100644 --- a/lisp/textmodes/tex-mode.el +++ b/lisp/textmodes/tex-mode.el @@ -1145,9 +1145,10 @@ on the line for the invalidity you want to see." (if no-matches (insert "None!\n")) (if (interactive-p) - (message "%s mismatch%s found" - (if no-matches "No" num-matches) - (if (> num-matches 1) "es" "")))))))) + (message (cond (no-matches "No mismatches found") + ((= num-matches 1) "1 mismatch found") + (t "%d mismatches found")) + num-matches))))))) (defun tex-validate-region (start end) "Check for mismatched braces or $'s in region. |