master ac102bb 2/2: * lisp/net/ange-ftp.el (ange-ftp-ls): Handle several "--dired" switches.

[Michael Albinus]

branch: master
commit ac102bb966f7944babbd8594684550905eecca0a
Author: Michael Albinus <michael.albinus@gmx.de>
Commit: Michael Albinus <michael.albinus@gmx.de>

    * lisp/net/ange-ftp.el (ange-ftp-ls): Handle several "--dired" switches.
---
 lisp/net/ange-ftp.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/net/ange-ftp.el b/lisp/net/ange-ftp.el
index 9559b12..fa13dd5 100644
--- a/lisp/net/ange-ftp.el
+++ b/lisp/net/ange-ftp.el
@@ -2547,7 +2547,7 @@ can parse the output from a DIR listing for a host of 
type TYPE.")
 FILE is the full name of the remote file, LSARGS is any args to pass to the
 `ls' command, and PARSE specifies that the output should be parsed and stored
 away in the internal cache."
-  (when (string-match "^--dired\\s-+" lsargs)
+  (while (string-match "^--dired\\s-+" lsargs)
     (setq lsargs (replace-match "" nil t lsargs)))
   ;; If parse is t, we assume that file is a directory. i.e. we only parse
   ;; full directory listings.