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

(Bug#14402)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4207866..d39c434 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 3471bbb..a8f53d3 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)