* ido.el (ido-read-internal): Allow forward slash on windows.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 60c1174f06d23f9533dcfc2aa164423ec1c5a736..41000df890d606a315fe59c9e89c407dbafe5a23 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2013-06-25  Leo Liu  <sdl.web@gmail.com>
+
+       * ido.el (ido-read-internal): Allow forward slash on windows.
+
 2013-06-24  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
        * net/eww.el (eww): Start of strings is \\`, not ^.

diff --git a/lisp/ido.el b/lisp/ido.el
index daa090d5d6f323e3a346911dee42db9a871cfc41..4a4ecdcdb1af74d13fb18911007966ddcfc89a4e 100644 (file)
--- a/lisp/ido.el
+++ b/lisp/ido.el
@@ -2142,8 +2142,9 @@ If INITIAL is non-nil, it specifies the initial input string."
            (setq ido-set-default-item t)))
 
         ((string-match (if (memq system-type '(windows-nt ms-dos))
-                           "\\`[a-zA-Z]:\\|[\\][^\\]"
-                         "/[^/]") ido-selected)
+                           "\\`[a-zA-Z]:\\|[/\\][^/\\]"
+                         "/[^/]")
+                       ido-selected)
          (ido-set-current-directory (file-name-directory ido-selected))
          (setq ido-set-default-item t))