]> code.delx.au - gnu-emacs/commitdiff
Simplify last change to ido.el
authorLeo Liu <sdl.web@gmail.com>
Mon, 24 Jun 2013 04:08:10 +0000 (12:08 +0800)
committerLeo Liu <sdl.web@gmail.com>
Mon, 24 Jun 2013 04:08:10 +0000 (12:08 +0800)
lisp/ido.el

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