# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 858119542 0
# Node ID 1b3723c744f566e1864c79b8b9fa6b10a263f33f
# Parent  df636f296adfbe1884bed928b8fd41c9a2600b09
(lisp-imenu-generic-expression): Accept `*', `|',
and `:' in symbol names.

diff -r df636f296adf -r 1b3723c744f5 lisp/emacs-lisp/lisp-mode.el
--- a/lisp/emacs-lisp/lisp-mode.el	Tue Mar 11 22:27:36 1997 +0000
+++ b/lisp/emacs-lisp/lisp-mode.el	Tue Mar 11 22:32:22 1997 +0000
@@ -82,11 +82,11 @@
 (defvar lisp-imenu-generic-expression
       '(
 	(nil 
-	 "^\\s-*(def\\(un\\|subst\\|macro\\|advice\\)\\s-+\\([-A-Za-z0-9+]+\\)" 2)
+	 "^\\s-*(def\\(un\\|subst\\|macro\\|advice\\)\\s-+\\([-A-Za-z0-9+*|:]+\\)" 2)
 	("Variables" 
-	 "^\\s-*(def\\(var\\|const\\)\\s-+\\([-A-Za-z0-9+]+\\)" 2)
+	 "^\\s-*(def\\(var\\|const\\)\\s-+\\([-A-Za-z0-9+*|:]+\\)" 2)
 	("Types" 
-	 "^\\s-*(def\\(type\\|struct\\|class\\|ine-condition\\)\\s-+\\([-A-Za-z0-9+]+\\)" 
+	 "^\\s-*(def\\(type\\|struct\\|class\\|ine-condition\\)\\s-+\\([-A-Za-z0-9+*|:]+\\)" 
 	 2))
 
   "Imenu generic expression for Lisp mode.  See `imenu-generic-expression'.")