(prolog-mode-variables): Fix imenu-generic-expression.

diff --git a/lisp/progmodes/prolog.el b/lisp/progmodes/prolog.el
index c5a169d2fa1441a53d19dba2bc8c1a4627c535ea..25bc337a7b286be32e009679b2d4b5e2b12050c6 100644 (file)
--- a/lisp/progmodes/prolog.el
+++ b/lisp/progmodes/prolog.el
@@ -101,7 +101,7 @@ nil means send actual operating system end of file."
   (make-local-variable 'paragraph-ignore-fill-prefix)
   (setq paragraph-ignore-fill-prefix t)
   (make-local-variable 'imenu-generic-expression)
-  (setq imenu-generic-expression "^[a-z][a-zA-Z0-9_]+")
+  (setq imenu-generic-expression '((nil "^\\sw+" 0)))
   (make-local-variable 'indent-line-function)
   (setq indent-line-function 'prolog-indent-line)
   (make-local-variable 'comment-start)