mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-07 15:00:34 -08:00
Code Issues Projects Releases Wiki Activity

(checkdoc-this-string-valid-engine):

Browse source 
Check for '(' in column 0 of doc string.
This commit is contained in:
Gerd Moellmann 2001-09-17 15:51:54 +00:00
parent 990e1190eb
commit 9c07782ebd
1 changed files with 11 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -1374,6 +1374,17 @@ regexp short cuts work. FP is the function defun information."
"Second line should not have indentation"
(match-beginning 1)
(match-end 1)))))
;; * Check for '(' in column 0.
(save-excursion
(when (re-search-forward "^(" e t)
(if (checkdoc-autofix-ask-replace (match-beginning 0)
(match-end 0)
"Escape this '('? "
"\\(")
nil
(checkdoc-create-error
"Open parenthesis in column 0 should be escaped"
(match-beginning 0) (match-end 0)))))
;; * Do not start or end a documentation string with whitespace.
(let (start end)
(if (or (if (looking-at "\"\\([ \t\n]+\\)")