Mercurial > emacs
comparison lisp/emacs-lisp/lisp-mode.el @ 67295:df35219b6508
Put `doc-string-elt' property on
easy-mmode-define-global-mode and define-global-minor-mode.
(lisp-imenu-generic-expression): Add define-global-minor-mode.
author | Juri Linkov <juri@jurta.org> |
---|---|
date | Sun, 04 Dec 2005 02:36:13 +0000 |
parents | 249c0ac46fca |
children | 067115a6e738 7beb78bc1f8e |
comparison
equal
deleted
inserted
replaced
67294:36d05049ff37 | 67295:df35219b6508 |
---|---|
94 (purecopy (concat "^\\s-*(" | 94 (purecopy (concat "^\\s-*(" |
95 (eval-when-compile | 95 (eval-when-compile |
96 (regexp-opt | 96 (regexp-opt |
97 '("defun" "defun*" "defsubst" "defmacro" | 97 '("defun" "defun*" "defsubst" "defmacro" |
98 "defadvice" "define-skeleton" | 98 "defadvice" "define-skeleton" |
99 "define-minor-mode" "define-derived-mode" | 99 "define-minor-mode" "define-global-minor-mode" |
100 "define-generic-mode" | 100 "define-derived-mode" "define-generic-mode" |
101 "define-compiler-macro" "define-modify-macro" | 101 "define-compiler-macro" "define-modify-macro" |
102 "defsetf" "define-setf-expander" | 102 "defsetf" "define-setf-expander" |
103 "define-method-combination" | 103 "define-method-combination" |
104 "defgeneric" "defmethod") t)) | 104 "defgeneric" "defmethod") t)) |
105 "\\s-+\\(\\(\\sw\\|\\s_\\)+\\)")) | 105 "\\s-+\\(\\(\\sw\\|\\s_\\)+\\)")) |
139 (put 'define-skeleton 'doc-string-elt 2) | 139 (put 'define-skeleton 'doc-string-elt 2) |
140 (put 'define-derived-mode 'doc-string-elt 4) | 140 (put 'define-derived-mode 'doc-string-elt 4) |
141 (put 'define-compilation-mode 'doc-string-elt 3) | 141 (put 'define-compilation-mode 'doc-string-elt 3) |
142 (put 'easy-mmode-define-minor-mode 'doc-string-elt 2) | 142 (put 'easy-mmode-define-minor-mode 'doc-string-elt 2) |
143 (put 'define-minor-mode 'doc-string-elt 2) | 143 (put 'define-minor-mode 'doc-string-elt 2) |
144 (put 'easy-mmode-define-global-mode 'doc-string-elt 2) | |
145 (put 'define-global-minor-mode 'doc-string-elt 2) | |
144 (put 'define-generic-mode 'doc-string-elt 7) | 146 (put 'define-generic-mode 'doc-string-elt 7) |
145 (put 'define-ibuffer-filter 'doc-string-elt 2) | 147 (put 'define-ibuffer-filter 'doc-string-elt 2) |
146 (put 'define-ibuffer-op 'doc-string-elt 3) | 148 (put 'define-ibuffer-op 'doc-string-elt 3) |
147 (put 'define-ibuffer-sorter 'doc-string-elt 2) | 149 (put 'define-ibuffer-sorter 'doc-string-elt 2) |
148 (put 'lambda 'doc-string-elt 2) | 150 (put 'lambda 'doc-string-elt 2) |