diff options
| author | John Paul Wallington | 2004-08-30 19:05:10 +0000 |
|---|---|---|
| committer | John Paul Wallington | 2004-08-30 19:05:10 +0000 |
| commit | f04232c3c2242acb4c2a188565a61cf3a986f3e8 (patch) | |
| tree | 33a3a1fb469f335b4aa0d7b85c252640d7f90bb7 | |
| parent | 11715f92de50ee7c004386d9de00b7f3e2df633b (diff) | |
| download | emacs-f04232c3c2242acb4c2a188565a61cf3a986f3e8.tar.gz emacs-f04232c3c2242acb4c2a188565a61cf3a986f3e8.zip | |
(tex-validate-buffer): Use distinct strings rather than
programatically constructing message.
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | 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 @@ | |||
| 1 | 2004-08-30 John Paul Wallington <jpw@gnu.org> | ||
| 2 | |||
| 3 | * textmodes/tex-mode.el (tex-validate-buffer): Use distinct | ||
| 4 | strings rather than programatically constructing message. | ||
| 5 | |||
| 1 | 2004-08-30 Richard M. Stallman <rms@gnu.org> | 6 | 2004-08-30 Richard M. Stallman <rms@gnu.org> |
| 2 | 7 | ||
| 3 | * emacs-lisp/lisp-mode.el (prin1-char): Don't turn S-a into A. | 8 | * 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." | |||
| 1145 | (if no-matches | 1145 | (if no-matches |
| 1146 | (insert "None!\n")) | 1146 | (insert "None!\n")) |
| 1147 | (if (interactive-p) | 1147 | (if (interactive-p) |
| 1148 | (message "%s mismatch%s found" | 1148 | (message (cond (no-matches "No mismatches found") |
| 1149 | (if no-matches "No" num-matches) | 1149 | ((= num-matches 1) "1 mismatch found") |
| 1150 | (if (> num-matches 1) "es" "")))))))) | 1150 | (t "%d mismatches found")) |
| 1151 | num-matches))))))) | ||
| 1151 | 1152 | ||
| 1152 | (defun tex-validate-region (start end) | 1153 | (defun tex-validate-region (start end) |
| 1153 | "Check for mismatched braces or $'s in region. | 1154 | "Check for mismatched braces or $'s in region. |