Mercurial > emacs
changeset 5115:da6f8aa6c0aa
(dired-goto-file): Don't try matching one line twice.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Tue, 23 Nov 1993 00:11:43 +0000 |
| parents | b37f62d72049 |
| children | b0ff9171868a |
| files | lisp/dired.el |
| diffstat | 1 files changed, 4 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/dired.el Mon Nov 22 19:47:26 1993 +0000 +++ b/lisp/dired.el Tue Nov 23 00:11:43 1993 +0000 @@ -1418,7 +1418,10 @@ ;; correct) match could have been elsewhere on the ;; ;; line (e.g. "-" would match somewhere in the ;; permission bits). - (setq found (dired-move-to-filename))))))) + (setq found (dired-move-to-filename)) + ;; If this isn't the right line, move forward to avoid + ;; trying this line again. + (forward-line 1)))))) (and found ;; return value of point (i.e., FOUND): (goto-char found))))