mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-28 07:45:00 +00:00
Code Issues Releases Activity

(checkdoc-file-comments-engine):

Browse Source 
Turn off error in some re-search-forward calls.
This commit is contained in:
Richard M. Stallman 2001-11-11 20:06:58 +00:00
parent 1c4fe319c9
commit c9d557f595
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/emacs-lisp/checkdoc.el
View File

@ -2217,7 +2217,7 @@ Code:, and others referenced in the style guide."
((or (re-search-forward "^;;; History" nil t)
(re-search-forward "^;;; Code" nil t)
(re-search-forward "^(require" nil t)
(re-search-forward "^("))
(re-search-forward "^(" nil t))
(beginning-of-line)))
(if (checkdoc-y-or-n-p
"You should have a \";;; Commentary:\", add one? ")
@ -2246,7 +2246,7 @@ Code:, and others referenced in the style guide."
(re-search-forward "^;;\\s-*\n\\|^\n" nil t))
((or (re-search-forward "^;;; Code" nil t)
(re-search-forward "^(require" nil t)
(re-search-forward "^("))
(re-search-forward "^(" nil t))
(beginning-of-line)))
(if (checkdoc-y-or-n-p
"You should have a \";;; History:\", add one? ")