Mercurial > emacs
comparison lisp/emacs-lisp/lisp-mode.el @ 67276:249c0ac46fca
(lisp-imenu-generic-expression): Fix bug whereby names of length one
or names starting with a symbol-constituent character would not be returned.
| author | Eli Zaretskii <eliz@gnu.org> |
|---|---|
| date | Sat, 03 Dec 2005 09:47:40 +0000 |
| parents | d7776140d845 |
| children | df35219b6508 |
comparison
equal
deleted
inserted
replaced
| 67275:ee1508db6de2 | 67276:249c0ac46fca |
|---|---|
| 100 "define-generic-mode" | 100 "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\\(\\sw\\|\\s_\\)+\\)")) | 105 "\\s-+\\(\\(\\sw\\|\\s_\\)+\\)")) |
| 106 2) | 106 2) |
| 107 (list (purecopy "Variables") | 107 (list (purecopy "Variables") |
| 108 (purecopy (concat "^\\s-*(" | 108 (purecopy (concat "^\\s-*(" |
| 109 (eval-when-compile | 109 (eval-when-compile |
| 110 (regexp-opt | 110 (regexp-opt |
| 111 '("defvar" "defconst" "defconstant" "defcustom" | 111 '("defvar" "defconst" "defconstant" "defcustom" |
| 112 "defparameter" "define-symbol-macro") t)) | 112 "defparameter" "define-symbol-macro") t)) |
| 113 "\\s-+\\(\\sw\\(\\sw\\|\\s_\\)+\\)")) | 113 "\\s-+\\(\\(\\sw\\|\\s_\\)+\\)")) |
| 114 2) | 114 2) |
| 115 (list (purecopy "Types") | 115 (list (purecopy "Types") |
| 116 (purecopy (concat "^\\s-*(" | 116 (purecopy (concat "^\\s-*(" |
| 117 (eval-when-compile | 117 (eval-when-compile |
| 118 (regexp-opt | 118 (regexp-opt |
| 119 '("defgroup" "deftheme" "deftype" "defstruct" | 119 '("defgroup" "deftheme" "deftype" "defstruct" |
| 120 "defclass" "define-condition" "define-widget" | 120 "defclass" "define-condition" "define-widget" |
| 121 "defface" "defpackage") t)) | 121 "defface" "defpackage") t)) |
| 122 "\\s-+'?\\(\\sw\\(\\sw\\|\\s_\\)+\\)")) | 122 "\\s-+'?\\(\\(\\sw\\|\\s_\\)+\\)")) |
| 123 2)) | 123 2)) |
| 124 | 124 |
| 125 "Imenu generic expression for Lisp mode. See `imenu-generic-expression'.") | 125 "Imenu generic expression for Lisp mode. See `imenu-generic-expression'.") |
| 126 | 126 |
| 127 ;; This was originally in autoload.el and is still used there. | 127 ;; This was originally in autoload.el and is still used there. |