From: Michael Albinus <michael.albinus@gmx.de>
Date: Sun, 13 Mar 2022 15:50:14 +0000 (+0100)
Subject: * lisp/net/ange-ftp.el (ange-ftp-ls): Make a loop when sanitizing LSARGS.
X-Git-Tag: emacs-29.0.90~1931^2~1151
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=35f75b63b51660190b48020c048701ae8553ea1f;p=emacs.git

* lisp/net/ange-ftp.el (ange-ftp-ls): Make a loop when sanitizing LSARGS.
---

diff --git a/lisp/net/ange-ftp.el b/lisp/net/ange-ftp.el
index ef8527fadae..9937c022d9f 100644
--- a/lisp/net/ange-ftp.el
+++ b/lisp/net/ange-ftp.el
@@ -2554,7 +2554,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 "--" lsargs)
+  (while (string-match "--" lsargs)
     (require 'ls-lisp)
     (setq lsargs (ls-lisp--sanitize-switches lsargs)))
   ;; If parse is t, we assume that file is a directory. i.e. we only parse