From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Wed, 24 Oct 2012 19:40:23 +0000 (-0400)
Subject: * lisp/minibuffer.el (minibuffer-force-complete): Use one more marker
X-Git-Tag: emacs-24.2.90~209^2~83
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3c92de703166390edbbf9833f282342ce2306699;p=emacs.git

* lisp/minibuffer.el (minibuffer-force-complete): Use one more marker
for the temporary-overlay-map command.

Fixes: debbugs:12619
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a911832a8fb..07ce9cea1a3 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2012-10-24  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* minibuffer.el (minibuffer-force-complete): Use one more marker
+	for the temporary-overlay-map command (bug#12619).
+
 2012-10-24  Chong Yidong  <cyd@gnu.org>
 
 	* time.el (display-time-world-mode): Derive from special-mode.
diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el
index 27050042b83..4267fe4db4f 100644
--- a/lisp/minibuffer.el
+++ b/lisp/minibuffer.el
@@ -1114,7 +1114,7 @@ Repeated uses step through the possible completions."
   ;; FIXME: Need to deal with the extra-size issue here as well.
   ;; FIXME: ~/src/emacs/t<M-TAB>/lisp/minibuffer.el completes to
   ;; ~/src/emacs/trunk/ and throws away lisp/minibuffer.el.
-  (let* ((start (field-beginning))
+  (let* ((start (copy-marker (field-beginning)))
          (end (field-end))
          ;; (md (completion--field-metadata start))
          (all (completion-all-sorted-completions))