(sh-imenu-generic-expression): Fix doc,

:type.

diff --git a/lisp/progmodes/sh-script.el b/lisp/progmodes/sh-script.el
index 375806068d6cc9bad3f940eca09cdb7f0a713772..d99e31308705426016c925f9b8501e5e99e52a9d 100644 (file)
--- a/lisp/progmodes/sh-script.el
+++ b/lisp/progmodes/sh-script.el
@@ -321,10 +321,14 @@ shell it really is."
 (defcustom sh-imenu-generic-expression
   `((sh
      . ((nil "^\\s-*\\(function\\s-+\\)?\\([A-Za-z_][A-Za-z_0-9]+\\)\\s-*()" 2))))
-  "*Regular expression for recognizing shell function definitions.
-See `sh-feature'."
-  :type '(repeat (cons (symbol :tag "Shell")
-                      regexp))
+  "*Alist of regular expressions for recognizing shell function definitions.
+See `sh-feature' and `imenu-generic-expression'."
+  :type '(alist :key-type (symbol :tag "Shell")
+               :value-type (alist :key-type (choice :tag "Title"
+                                                    string
+                                                    (const :tag "None" nil))
+                                  :value-type
+                                  (repeat :tag "Regexp, index..." sexp)))
   :group 'sh-script
   :version "20.4")