Mercurial > emacs
changeset 5067:4854aff5c5b3
(ange-ftp-parse-dired-listing): Skip extra blank line
after the "total" line.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Fri, 19 Nov 1993 16:19:32 +0000 |
| parents | 8abe8fb9621c |
| children | 9a42f23df119 |
| files | lisp/ange-ftp.el |
| diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ange-ftp.el Fri Nov 19 15:57:50 1993 +0000 +++ b/lisp/ange-ftp.el Fri Nov 19 16:19:32 1993 +0000 @@ -856,7 +856,7 @@ ;;;; Internal variables. ;;;; ------------------------------------------------------------ -(defconst ange-ftp-version "$Revision: 1.34 $") +(defconst ange-ftp-version "$Revision: 1.35 $") (defvar ange-ftp-data-buffer-name " *ftp data*" "Buffer name to hold directory listing data received from ftp process.") @@ -2437,6 +2437,8 @@ (cond ((looking-at "^total [0-9]+$") (forward-line 1) + ;; Some systems put in a blank line here. + (if (eolp) (forward-line 1)) (ange-ftp-ls-parser)) ((looking-at "[^\n]+\\( not found\\|: Not a directory\\)\n\\'") ;; It's an ls error message.