Mercurial > emacs
changeset 72565:186382a0d1cc
* emacs-lisp/checkdoc.el (checkdoc-file-comments-engine): Insert
commentary after first line summary.
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Mon, 28 Aug 2006 16:57:28 +0000 |
| parents | 976ef29e497e |
| children | 41f22ed02e75 |
| files | lisp/ChangeLog lisp/emacs-lisp/checkdoc.el |
| diffstat | 2 files changed, 5 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Mon Aug 28 15:40:21 2006 +0000 +++ b/lisp/ChangeLog Mon Aug 28 16:57:28 2006 +0000 @@ -1,5 +1,8 @@ 2006-08-28 Chong Yidong <cyd@stupidchicken.com> + * 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.
--- a/lisp/emacs-lisp/checkdoc.el Mon Aug 28 15:40:21 2006 +0000 +++ b/lisp/emacs-lisp/checkdoc.el Mon Aug 28 16:57:28 2006 +0000 @@ -2261,7 +2261,8 @@ (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")