# HG changeset patch
# User Kim F. Storm <storm@cua.dk>
# Date 1108589801 0
# Node ID 283f8f92beaad4b4910a2830316a9bf99c95fc19
# Parent  ad298a549d12796fa38728acc12a93ad02ac134e
(ido-fallback-command): Pass user input to fallback command.

diff -r ad298a549d12 -r 283f8f92beaa lisp/ido.el
--- a/lisp/ido.el	Wed Feb 16 21:36:24 2005 +0000
+++ b/lisp/ido.el	Wed Feb 16 21:36:41 2005 +0000
@@ -2280,6 +2280,9 @@
 (defun ido-fallback-command ()
   "Fallback to non-ido version of current command."
   (interactive)
+  (let ((i (length ido-text)))
+    (while (> i 0)
+      (push (aref ido-text (setq i (1- i))) unread-command-events)))
   (setq ido-exit 'fallback)
   (exit-minibuffer))