# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1005509218 0
# Node ID 14c471312660c06544b1df124d9a3881831d5249
# Parent  8733f6312f8ac94533cdef3a8cb7bbc134ca8ab1
(checkdoc-file-comments-engine):
Turn off error in some re-search-forward calls.

diff -r 8733f6312f8a -r 14c471312660 lisp/emacs-lisp/checkdoc.el
--- 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? ")