Mercurial > emacs
diff lisp/emacs-lisp/checkdoc.el @ 105725:597007306f48
* emacs-lisp/checkdoc.el (checkdoc-proper-noun-region-engine):
Allow uncapitalized info node names (Bug#3921).
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Fri, 23 Oct 2009 17:26:06 +0000 |
| parents | bbd67ae03f38 |
| children | 4d7a7b574da2 |
line wrap: on
line diff
--- a/lisp/emacs-lisp/checkdoc.el Fri Oct 23 16:19:37 2009 +0000 +++ b/lisp/emacs-lisp/checkdoc.el Fri Oct 23 17:26:06 2009 +0000 @@ -2016,7 +2016,12 @@ ;; surrounded by /, as in a URL or filename: /emacs/ (not (and (= ?/ (char-after e)) (= ?/ (char-before b)))) - (not (checkdoc-in-example-string-p begin end))) + (not (checkdoc-in-example-string-p begin end)) + ;; info node + (not (save-excursion + (goto-char b) + (looking-back "\\<[Ii]nfo[ \t\n]+\\(node\\|anchor\\)[ \t\n]+`(" + (line-beginning-position))))) (if (checkdoc-autofix-ask-replace b e (format "Text %s should be capitalized. Fix? " text)