* emacs-lisp/checkdoc.el (checkdoc-file-comments-engine): Insert

commentary after first line summary.
This commit is contained in:
Chong Yidong 2006-08-28 16:57:28 +00:00
parent 6081889eb5
commit 81e213dc7c
2 changed files with 5 additions and 1 deletions

View file

@ -2261,7 +2261,8 @@ Code:, and others referenced in the style guide."
(re-search-forward "^;;; Code" nil t)
(re-search-forward "^(require" nil t)
(re-search-forward "^(" nil t))
(beginning-of-line)))
(beginning-of-line))
(t (re-search-forward ";;; .* --- .*\n")))
(if (checkdoc-y-or-n-p
"You should have a \";;; Commentary:\", add one? ")
(insert "\n;;; Commentary:\n;; \n\n")