(checkdoc-file-comments-engine):

Turn off error in some re-search-forward calls.

diff --git a/lisp/emacs-lisp/checkdoc.el b/lisp/emacs-lisp/checkdoc.el
index 6364a5d0db5c848d2351d5098205814b65b6a066..899fe6848a98633aaa4aeb9673014430f03aba5c 100644 (file)
--- a/lisp/emacs-lisp/checkdoc.el
+++ b/lisp/emacs-lisp/checkdoc.el
@@ -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? ")