diff options
| -rw-r--r-- | lisp/emacs-lisp/checkdoc.el | 4 |
1 files 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." | |||
| 2217 | ((or (re-search-forward "^;;; History" nil t) | 2217 | ((or (re-search-forward "^;;; History" nil t) |
| 2218 | (re-search-forward "^;;; Code" nil t) | 2218 | (re-search-forward "^;;; Code" nil t) |
| 2219 | (re-search-forward "^(require" nil t) | 2219 | (re-search-forward "^(require" nil t) |
| 2220 | (re-search-forward "^(")) | 2220 | (re-search-forward "^(" nil t)) |
| 2221 | (beginning-of-line))) | 2221 | (beginning-of-line))) |
| 2222 | (if (checkdoc-y-or-n-p | 2222 | (if (checkdoc-y-or-n-p |
| 2223 | "You should have a \";;; Commentary:\", add one? ") | 2223 | "You should have a \";;; Commentary:\", add one? ") |
| @@ -2246,7 +2246,7 @@ Code:, and others referenced in the style guide." | |||
| 2246 | (re-search-forward "^;;\\s-*\n\\|^\n" nil t)) | 2246 | (re-search-forward "^;;\\s-*\n\\|^\n" nil t)) |
| 2247 | ((or (re-search-forward "^;;; Code" nil t) | 2247 | ((or (re-search-forward "^;;; Code" nil t) |
| 2248 | (re-search-forward "^(require" nil t) | 2248 | (re-search-forward "^(require" nil t) |
| 2249 | (re-search-forward "^(")) | 2249 | (re-search-forward "^(" nil t)) |
| 2250 | (beginning-of-line))) | 2250 | (beginning-of-line))) |
| 2251 | (if (checkdoc-y-or-n-p | 2251 | (if (checkdoc-y-or-n-p |
| 2252 | "You should have a \";;; History:\", add one? ") | 2252 | "You should have a \";;; History:\", add one? ") |