(lisp-imenu-generic-expression): Fix bug whereby names of length one

or names starting with a symbol-constituent character would not be returned.
This commit is contained in:
Eli Zaretskii 2005-12-03 09:48:08 +00:00
parent 6273dc6821
commit d20a1ebb17
2 changed files with 9 additions and 3 deletions

View file

@ -102,7 +102,7 @@
"defsetf" "define-setf-expander"
"define-method-combination"
"defgeneric" "defmethod") t))
"\\s-+\\(\\sw\\(\\sw\\|\\s_\\)+\\)"))
"\\s-+\\(\\(\\sw\\|\\s_\\)+\\)"))
2)
(list (purecopy "Variables")
(purecopy (concat "^\\s-*("
@ -110,7 +110,7 @@
(regexp-opt
'("defvar" "defconst" "defconstant" "defcustom"
"defparameter" "define-symbol-macro") t))
"\\s-+\\(\\sw\\(\\sw\\|\\s_\\)+\\)"))
"\\s-+\\(\\(\\sw\\|\\s_\\)+\\)"))
2)
(list (purecopy "Types")
(purecopy (concat "^\\s-*("
@ -119,7 +119,7 @@
'("defgroup" "deftheme" "deftype" "defstruct"
"defclass" "define-condition" "define-widget"
"defface" "defpackage") t))
"\\s-+'?\\(\\sw\\(\\sw\\|\\s_\\)+\\)"))
"\\s-+'?\\(\\(\\sw\\|\\s_\\)+\\)"))
2))
"Imenu generic expression for Lisp mode. See `imenu-generic-expression'.")