(pascal-imenu-generic-expression): Add menu-title and fix parentheses.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8e55347e5e19c9c53938bbf632b118cde8513ff5..d3c1e1bd93669d84aab2b97ea2c6610ed10f36a7 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2002-02-12  Eli Zaretskii  <eliz@is.elta.co.il>
+
+       * progmodes/pascal.el (pascal-imenu-generic-expression): Add
+       menu-title and fix parentheses.
+
 2002-02-08  Eli Zaretskii  <eliz@is.elta.co.il>
 
        * ffap.el (ffap-newsgroup-p): Test for non-nil symbol-value of htb.

diff --git a/lisp/progmodes/pascal.el b/lisp/progmodes/pascal.el
index 1464923b7d5e97485f07ea760ce3b95a35d78dd1..d7c09446e3c3417e674611442cd17e0b76cb5d7b 100644 (file)
--- a/lisp/progmodes/pascal.el
+++ b/lisp/progmodes/pascal.el
@@ -100,7 +100,7 @@
   )
 
 (defvar pascal-imenu-generic-expression
-  '("^[ \t]*\\(function\\|procedure\\)[ \t\n]+\\([a-zA-Z0-9_.:]+\\)" . (2))
+  '((nil "^[ \t]*\\(function\\|procedure\\)[ \t\n]+\\([a-zA-Z0-9_.:]+\\)" 2))
   "Imenu expression for Pascal-mode.  See `imenu-generic-expression'.")
 
 (defvar pascal-keywords