diff --git a/lisp/ido.el b/lisp/ido.el
index 93ecfc1755a..9a79023775a 100644
--- a/lisp/ido.el
+++ b/lisp/ido.el
@@ -2448,7 +2448,6 @@ for first matching file."
 	res)
     (while paths
       (setq path (car paths)
-	    paths (cdr paths)
 	    paths (cdr paths))
       (if (and (string-match "^/" path)
 	       (file-exists-p path))