changeset 40926:14c471312660

(checkdoc-file-comments-engine): Turn off error in some re-search-forward calls.
author Richard M. Stallman <rms@gnu.org>
date Sun, 11 Nov 2001 20:06:58 +0000
parents 8733f6312f8a
children d8cd2ee4b10c
files lisp/emacs-lisp/checkdoc.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/checkdoc.el	Sun Nov 11 20:05:39 2001 +0000
+++ b/lisp/emacs-lisp/checkdoc.el	Sun Nov 11 20:06:58 2001 +0000
@@ -2217,7 +2217,7 @@
 	       ((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 @@
 	      (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? ")