Mercurial > emacs

changeset 67276:249c0ac46fca

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(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 ee1508db6de2
children 6b917e85bd8b
files lisp/emacs-lisp/lisp-mode.el
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/lisp-mode.el	Sat Dec 03 02:31:40 2005 +0000
+++ b/lisp/emacs-lisp/lisp-mode.el	Sat Dec 03 09:47:40 2005 +0000
@@ -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'.")