* minibuf-eldef.el (minibuffer-default--in-prompt-regexps): Handle

"foo (bar, default: xxx): " prompts.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c0a91bb75dc6e674efc03f1bd23db510c457a524..2878db6271f2c2b260cb4ff07a2025479d59e734 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2013-02-10  Christopher Schmidt  <christopher@ch.ristopher.com>
+
+       * minibuf-eldef.el (minibuffer-default--in-prompt-regexps): Handle
+       "foo (bar, default: xxx): " prompts.
+
 2013-02-10  Chong Yidong  <cyd@gnu.org>
 
        * files.el (basic-save-buffer-1): Do not set

diff --git a/lisp/minibuf-eldef.el b/lisp/minibuf-eldef.el
index 3826a91f0e0766770cfddc3ea556c85384db4331..3b59a9c622a902c033d8da94b845ae1a7a0dff80 100644 (file)
--- a/lisp/minibuf-eldef.el
+++ b/lisp/minibuf-eldef.el
@@ -38,6 +38,7 @@
 (defun minibuffer-default--in-prompt-regexps ()
   `(("\\( (default\\(?: is\\)? \\(.*\\))\\):? \\'"
      1 ,(if minibuffer-eldef-shorten-default " [\\2]"))
+    ("([^(]+?\\(, default\\(?: is\\)? \\(.*\\)\\)):? \\'" 1)
     ("\\( \\[.*\\]\\):? *\\'" 1)))
 
 (defcustom minibuffer-eldef-shorten-default nil