diff options
| author | Stephen Eglen <stephen@gnu.org> | 1998-04-05 18:26:32 +0000 |
|---|---|---|
| committer | Stephen Eglen <stephen@gnu.org> | 1998-04-05 18:26:32 +0000 |
| commit | 666b94132b9d785b4ec6f0ecbfa451168134d150 (patch) | |
| tree | 86d786fd96dcb21413135c75d5e5830e66c28dbe /lisp/emacs-lisp/lisp-mnt.el | |
| parent | 3c14708ccfb71af5ea2324f71955480413402b92 (diff) | |
| download | emacs-666b94132b9d785b4ec6f0ecbfa451168134d150.tar.gz emacs-666b94132b9d785b4ec6f0ecbfa451168134d150.tar.bz2 emacs-666b94132b9d785b4ec6f0ecbfa451168134d150.zip | |
Customized.
Diffstat (limited to 'lisp/emacs-lisp/lisp-mnt.el')
| -rw-r--r-- | lisp/emacs-lisp/lisp-mnt.el | 35 |
1 files changed, 24 insertions, 11 deletions
diff --git a/lisp/emacs-lisp/lisp-mnt.el b/lisp/emacs-lisp/lisp-mnt.el index 4e7fae47125..9aebbf8d02d 100644 --- a/lisp/emacs-lisp/lisp-mnt.el +++ b/lisp/emacs-lisp/lisp-mnt.el @@ -117,7 +117,12 @@ ;;; Variables: -(defvar lm-header-prefix "^;;*[ \t]+\\(@\(#\)\\)?[ \t]*\\([\$]\\)?" +(defgroup lisp-mnt nil + "Minor mode for Emacs Lisp maintainers." + :prefix "lm-" + :group 'maint) + +(defcustom lm-header-prefix "^;;*[ \t]+\\(@\(#\)\\)?[ \t]*\\([\$]\\)?" "Prefix that is ignored before the tag. For example, you can write the 1st line synopsis string and headers like this in your Lisp package: @@ -127,16 +132,24 @@ in your Lisp package: ;; @(#) $Maintainer: Person Foo Bar $ The @(#) construct is used by unix what(1) and -then $identifier: doc string $ is used by GNU ident(1)") - -(defvar lm-comment-column 16 - "Column used for placing formatted output.") - -(defvar lm-commentary-header "Commentary\\|Documentation" - "Regexp which matches start of documentation section.") - -(defvar lm-history-header "Change Log\\|History" - "Regexp which matches the start of code log section.") +then $identifier: doc string $ is used by GNU ident(1)" + :type 'regexp + :group 'lisp-mnt) + +(defcustom lm-comment-column 16 + "Column used for placing formatted output." + :type 'integer + :group 'lisp-mnt) + +(defcustom lm-commentary-header "Commentary\\|Documentation" + "Regexp which matches start of documentation section." + :type 'regexp + :group 'lisp-mnt) + +(defcustom lm-history-header "Change Log\\|History" + "Regexp which matches the start of code log section." + :type 'regexp + :group 'lisp-mnt) ;;; Functions: |