changeset 57072:9dd4195f1c06

(checkdoc-this-string-valid-engine): Don't tell to use \\{...} when it's already done.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Sun, 12 Sep 2004 20:17:53 +0000
parents 974e68c1a8c5
children e8acd9183eb4
files lisp/emacs-lisp/checkdoc.el
diffstat 1 files changed, 3 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/checkdoc.el	Sun Sep 12 19:59:48 2004 +0000
+++ b/lisp/emacs-lisp/checkdoc.el	Sun Sep 12 20:17:53 2004 +0000
@@ -1561,8 +1561,9 @@
      ;; to describe the most important commands in your major mode, and
      ;; then use `\\{...}' to display the rest of the mode's keymap.
      (save-excursion
-       (if (re-search-forward "\\\\\\\\\\[\\w+" e t
-			      (1+ checkdoc-max-keyref-before-warn))
+       (if (and (re-search-forward "\\\\\\\\\\[\\w+" e t
+				   (1+ checkdoc-max-keyref-before-warn))
+		(not (re-search-forward "\\\\\\\\{\\w+}" e t)))
 	   (checkdoc-create-error
 	    "Too many occurrences of \\[function].  Use \\{keymap} instead"
 	    s (marker-position e))))