summaryrefslogtreecommitdiff
path: root/lisp/ido.el
diff options
context:
space:
mode:
authorKim F. Storm <storm@cua.dk>2005-02-16 21:36:41 +0000
committerKim F. Storm <storm@cua.dk>2005-02-16 21:36:41 +0000
commit059e629602aa73f24f1b56335fd6a6ba0ea8905a (patch)
treee45de7381a83e0905a0e36b3bfbe616fa6ce6daf /lisp/ido.el
parent564260b2bd7c81d456f6f68be1fe2ea5da38529a (diff)
downloademacs-059e629602aa73f24f1b56335fd6a6ba0ea8905a.tar.gz
(ido-fallback-command): Pass user input to fallback command.
Diffstat (limited to 'lisp/ido.el')
-rw-r--r--lisp/ido.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/ido.el b/lisp/ido.el
index 389ddb0b9a1..86a88d0d491 100644
--- a/lisp/ido.el
+++ b/lisp/ido.el
@@ -2280,6 +2280,9 @@ If no buffer or file exactly matching the prompt exists, maybe create a new one.
(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))