Mercurial > emacs
diff lisp/emacs-lisp/checkdoc.el @ 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 | 2849e4ae725f |
| children | 9715276c90ce 566253900690 |
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))))