From f04232c3c2242acb4c2a188565a61cf3a986f3e8 Mon Sep 17 00:00:00 2001 From: John Paul Wallington Date: Mon, 30 Aug 2004 19:05:10 +0000 Subject: [PATCH] (tex-validate-buffer): Use distinct strings rather than programatically constructing message. --- lisp/ChangeLog | 5 +++++ lisp/textmodes/tex-mode.el | 7 ++++--- 2 files changed, 9 insertions(+), 3 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index fab95b30909..e6b3e1f60a7 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2004-08-30 John Paul Wallington + + * textmodes/tex-mode.el (tex-validate-buffer): Use distinct + strings rather than programatically constructing message. + 2004-08-30 Richard M. Stallman * emacs-lisp/lisp-mode.el (prin1-char): Don't turn S-a into A. 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. -- 2.11.4.GIT