From c9d557f595b2e121e0f4f738bfb4a5efd869e951 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 11 Nov 2001 20:06:58 +0000 Subject: [PATCH] (checkdoc-file-comments-engine): Turn off error in some re-search-forward calls. --- lisp/emacs-lisp/checkdoc.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/emacs-lisp/checkdoc.el b/lisp/emacs-lisp/checkdoc.el index 6364a5d0db5..899fe6848a9 100644 --- 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? ") -- 2.39.2