# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1259976174 0
# Node ID ab53cadac0b65dd75c70ddecf05d3f41fcd13ae7
# Parent  3fea95b17dfa89935aeae0acf8663fad3fd9c8a7
(completion-pcm--merge-try): Also consider placing point after a star, if
that's the only place where modifications can make progress.

diff -r 3fea95b17dfa -r ab53cadac0b6 lisp/ChangeLog
--- a/lisp/ChangeLog	Sat Dec 05 00:24:03 2009 +0000
+++ b/lisp/ChangeLog	Sat Dec 05 01:22:54 2009 +0000
@@ -1,3 +1,9 @@
+2009-12-05  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* minibuffer.el (completion-pcm--merge-try): Also consider placing
+	point after a star, if that's the only place where modifications can
+	make progress.
+
 2009-12-05  Dan Nicolaescu  <dann@ics.uci.edu>
 
 	* vc-dir.el (vc-dir): Use the correct markup for showing keymaps
diff -r 3fea95b17dfa -r ab53cadac0b6 lisp/minibuffer.el
--- a/lisp/minibuffer.el	Sat Dec 05 00:24:03 2009 +0000
+++ b/lisp/minibuffer.el	Sat Dec 05 01:22:54 2009 +0000
@@ -1984,7 +1984,9 @@
 	     ;; order of preference) either at the old point, or at
 	     ;; the last place where there's something to choose, or
 	     ;; at the very end.
-             (pointpat (or (memq 'point mergedpat) (memq 'any mergedpat)
+             (pointpat (or (memq 'point mergedpat)
+                           (memq 'any   mergedpat)
+                           (memq 'star  mergedpat)
 			   mergedpat))
              ;; New pos from the start.
              (newpos (length (completion-pcm--pattern->string pointpat)))