* f90.el (f90-imenu-generic-expression): Fix typo in 2013-05-08 change.

(Bug#14402)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4207866beb5a7e3c06596a596f2c114074c7482d..d39c434cb6f966a08e4f2fa273c718306adf9507 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2013-05-14  Glenn Morris  <rgm@gnu.org>
+
+       * progmodes/f90.el (f90-imenu-generic-expression):
+       Fix typo in 2013-05-08 change.  (Bug#14402)
+
 2013-05-14  Jean-Philippe Gravel  <jpgravel@gmail.com>
 
        * progmodes/gdb-mi.el (gdb-running, gdb-starting): Remove

diff --git a/lisp/progmodes/f90.el b/lisp/progmodes/f90.el
index 3471bbbe38422cc4fe04aab96b9a0aa0738e6815..a8f53d397d681d3acf4ca89828d1412e66e708d8 100644 (file)
--- a/lisp/progmodes/f90.el
+++ b/lisp/progmodes/f90.el
@@ -981,7 +981,7 @@ Set subexpression 1 in the match-data to the name of the type."
       ("Submodules" "^[ \t0-9]*submodule[ \t]*([^)\n]+)[ \t]*\
 \\(\\(?:\\sw\\|\\s_\\)+\\)[ \t]*\\(!\\|$\\)" 1)
       ("Modules" "^[ \t0-9]*module[ \t]+\\(\\(?:\\sw\\|\\s_\\)+\\)[ \t]*\\(!\\|$\\)" 1)
-      '("Types" f90-imenu-type-matcher 1)
+      ("Types" f90-imenu-type-matcher 1)
       ;; Does not handle: "type[, stuff] :: foo".
       ;;(format "^[ \t0-9]*type[ \t]+\\(\\(%s\\|i%s\\|is\\(?:\\sw\\|\\s_\\)\\)\\(?:\\sw\\|\\s_\\)*\\)"
       ;;        not-ib not-s)