diff options
| author | Stefan Kangas <stefan@marxist.se> | 2021-09-26 02:02:52 +0200 |
|---|---|---|
| committer | Stefan Kangas <stefan@marxist.se> | 2021-09-26 11:37:29 +0200 |
| commit | 90948eb9d7e2f0770533f71931f4427757c2ad82 (patch) | |
| tree | fa340d8ab660357b4d860eaa24c4b379286c2202 /lisp/emacs-lisp | |
| parent | cd0817a0f7ea17ad7d1771224b5036b13b9f3815 (diff) | |
| download | emacs-90948eb9d7e2f0770533f71931f4427757c2ad82.tar.gz emacs-90948eb9d7e2f0770533f71931f4427757c2ad82.tar.bz2 emacs-90948eb9d7e2f0770533f71931f4427757c2ad82.zip | |
checkdoc: Library footer must match package.el requirement
* lisp/emacs-lisp/checkdoc.el (checkdoc-file-comments-engine):
Don't accept footer format unless it matches the requirement in
package.el.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/checkdoc.el | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/lisp/emacs-lisp/checkdoc.el b/lisp/emacs-lisp/checkdoc.el index 74c27343bc4..24e1ae3f097 100644 --- a/lisp/emacs-lisp/checkdoc.el +++ b/lisp/emacs-lisp/checkdoc.el @@ -2474,10 +2474,9 @@ Code:, and others referenced in the style guide." (save-excursion (goto-char (point-max)) (if (not (re-search-backward - (concat "^;;;[ \t]+" (regexp-quote fn) "\\(" (regexp-quote fe) - "\\)?[ \t]+ends here[ \t]*$" - "\\|^;;;[ \t]+ End of file[ \t]+" - (regexp-quote fn) "\\(" (regexp-quote fe) "\\)?") + ;; This should match the requirement in + ;; `package-buffer-info'. + (concat "^;;; " (regexp-quote (concat fn fe)) " ends here") nil t)) (if (checkdoc-y-or-n-p "No identifiable footer! Add one?") (progn |