mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-03-07 06:22:32 -08:00
Code Issues Projects Releases Wiki Activity

* emacs-lisp/checkdoc.el (checkdoc-proper-noun-region-engine):

Browse source 
Allow uncapitalized info node names (Bug#3921).
This commit is contained in:
Chong Yidong 2009-10-23 17:26:06 +00:00
parent 912314214b
commit 36bfa3af07
2 changed files with 9 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/ChangeLog
View file

@ -1,5 +1,8 @@
2009-10-23 Chong Yidong <cyd@stupidchicken.com>
* emacs-lisp/checkdoc.el (checkdoc-proper-noun-region-engine):
Allow uncapitalized info node names (Bug#3921).
* mail/emacsbug.el (report-emacs-bug): Tweak the sentence pointing
to the DEBUG file (Bug#3781).

7
lisp/emacs-lisp/checkdoc.el
View file

@ -2016,7 +2016,12 @@ If the offending word is in a piece of quoted text, then it is skipped."
;; 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)