(tcl-mode): Set imenu-generic-expression to the value of

tcl-imenu-generic-expression instead of the symbol.

diff --git a/lisp/progmodes/tcl.el b/lisp/progmodes/tcl.el
index 5a5dfe034460e0e4456bb5ae41e11575b41744fb..599075d66aaf690a8320234fd6c55b2aa2dff1db 100644 (file)
--- a/lisp/progmodes/tcl.el
+++ b/lisp/progmodes/tcl.el
@@ -6,7 +6,7 @@
 ;; Author: Tom Tromey <tromey@redhat.com>
 ;;    Chris Lindblad <cjl@lcs.mit.edu>
 ;; Keywords: languages tcl modes
-;; Version: $Revision: 1.73 $
+;; Version: $Revision: 1.74 $
 
 ;; This file is part of GNU Emacs.
 
@@ -549,7 +549,7 @@ Commands:
         (parse-sexp-lookup-properties . t)))
 
   (set (make-local-variable 'imenu-generic-expression)
-       'tcl-imenu-generic-expression)
+       tcl-imenu-generic-expression)
 
   ;; Settings for new dabbrev code.
   (set (make-local-variable 'dabbrev-case-fold-search) nil)