diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index afd6b25700c..c4128378b88 100644
--- 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-12  Per Abrahamsen  <abraham@dina.kvl.dk>
 
 	* menu-bar.el (menu-bar-options-save): Removed `truncate-lines'.
diff --git a/lisp/progmodes/pascal.el b/lisp/progmodes/pascal.el
index 1464923b7d5..d7c09446e3c 100644
--- 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