Parent Directory | Revision Log | Patch
revision 1.5 by kfstorm, Mon Jul 8 22:03:02 2002 UTC | revision 1.6 by kfstorm, Mon Jul 8 22:20:31 2002 UTC | |
---|---|---|
# | Line 2511 for first matching file." | Line 2511 for first matching file." |
2511 | res t)))))) | res t)))))) |
2512 | (if (and res (not (eq res t))) | (if (and res (not (eq res t))) |
2513 | (setq res (ido-sort-merged-list res auto))) | (setq res (ido-sort-merged-list res auto))) |
2514 | (when (and (or ido-rotate-temp ido-rotate-file-list-default) | |
2515 | (> (length text) 0)) | |
2516 | (let ((elt (assoc text res))) | |
2517 | (unless (eq elt (car res)) | |
2518 | (setq res (delq elt res)) | |
2519 | (setq res (cons elt res))))) | |
2520 | (message nil) | (message nil) |
2521 | res)) | res)) |
2522 |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |