From 6c6268c83d18e1a4268be10064ce4ce86c60004f Mon Sep 17 00:00:00 2001 From: Leo Liu Date: Mon, 24 Jun 2013 10:15:56 +0800 Subject: [PATCH] * ido.el (ido-read-internal): Fix bug#14620. --- lisp/ChangeLog | 4 ++++ lisp/ido.el | 6 +++--- 2 files changed, 7 insertions(+), 3 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 27e2b824953..440f66a9fe1 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2013-06-24 Leo Liu + + * ido.el (ido-read-internal): Fix bug#14620. + 2013-06-23 Juanma Barranquero * faces.el (face-documentation): Simplify. diff --git a/lisp/ido.el b/lisp/ido.el index 47c05b080f7..78d0112f4c4 100644 --- a/lisp/ido.el +++ b/lisp/ido.el @@ -2141,9 +2141,9 @@ If INITIAL is non-nil, it specifies the initial input string." done t) (setq ido-set-default-item t))) - ((or (string-match "[/\\][^/\\]" ido-selected) - (and (memq system-type '(windows-nt ms-dos)) - (string-match "\\`[a-zA-Z]:" ido-selected))) + ((if (memq system-type '(windows-nt ms-dos)) + (string-match "\\`[a-zA-Z]:\\|[\\][^\\]" ido-selected) + (string-match "/[^/]" ido-selected)) (ido-set-current-directory (file-name-directory ido-selected)) (setq ido-set-default-item t)) -- 2.39.2