(minibuffer--do-completion): Don't forget to propagate

the arg to recursive calls.

lisp/ChangeLog

+2008-04-10  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* minibuffer.el (minibuffer--do-completion): Don't forget to propagate
+	the arg to recursive calls.
+
 2008-04-09  Juanma Barranquero  <lekktu@gmail.com>
 	* minibuffer.el (completion-auto-help): Fix typo.

lisp/minibuffer.el

@@ -131,7 +131,7 @@ E = after completion we now have an Exact match.
 	   ;; whether this is a unique completion or not, so try again using
 	   ;; the real case (this shouldn't recurse again, because the next
 	   ;; time try-completion will return either t or the exact string).
-           (minibuffer--do-completion)
+           (minibuffer--do-completion try-completion-function)
 
           ;; It did find a match.  Do we match some possibility exactly now?
           (let ((exact (test-completion (field-string)