From: Chong Yidong Date: Mon, 28 Aug 2006 16:57:28 +0000 (+0000) Subject: * emacs-lisp/checkdoc.el (checkdoc-file-comments-engine): Insert X-Git-Tag: emacs-pretest-22.0.90~839 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=81e213dc7cb42ca0195a1b81d5cb1d50164d9182;p=emacs.git * emacs-lisp/checkdoc.el (checkdoc-file-comments-engine): Insert commentary after first line summary. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index cdb21cb510d..9c01cd76a45 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2006-08-28 Chong Yidong + * emacs-lisp/checkdoc.el (checkdoc-file-comments-engine): Insert + commentary after first line summary. + * woman.el (woman-follow): New function, based on `man-follow'. (woman-mode-map): Use it. diff --git a/lisp/emacs-lisp/checkdoc.el b/lisp/emacs-lisp/checkdoc.el index 68603c905a5..666b373ca53 100644 --- a/lisp/emacs-lisp/checkdoc.el +++ b/lisp/emacs-lisp/checkdoc.el @@ -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")