Mercurial > emacs
comparison lisp/ido.el @ 48067:40a74df31521
(ido-wide-find-dirs-or-files): Fixed problem that caused
incomplete list of matches to be returned.
| author | Kim F. Storm <storm@cua.dk> |
|---|---|
| date | Tue, 29 Oct 2002 14:14:56 +0000 |
| parents | 4086fbc6ad65 |
| children | c7684f618b74 |
comparison
equal
deleted
inserted
replaced
| 48066:0c2bd4f7dc39 | 48067:40a74df31521 |
|---|---|
| 2446 (concat "find " dir " -name \"" (if prefix "" "*") file "*\" -type " (if finddir "d" "f") " -print")))) | 2446 (concat "find " dir " -name \"" (if prefix "" "*") file "*\" -type " (if finddir "d" "f") " -print")))) |
| 2447 path d f | 2447 path d f |
| 2448 res) | 2448 res) |
| 2449 (while paths | 2449 (while paths |
| 2450 (setq path (car paths) | 2450 (setq path (car paths) |
| 2451 paths (cdr paths) | |
| 2452 paths (cdr paths)) | 2451 paths (cdr paths)) |
| 2453 (if (and (string-match "^/" path) | 2452 (if (and (string-match "^/" path) |
| 2454 (file-exists-p path)) | 2453 (file-exists-p path)) |
| 2455 (setq d (file-name-directory path) | 2454 (setq d (file-name-directory path) |
| 2456 f (file-name-nondirectory path) | 2455 f (file-name-nondirectory path) |