* net/tramp-sh.el (tramp-get-ls-command): Use "-b" argument if possible.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d762078dfd0272767fd21ab92e00739df5ab74cc..0b7de93cc02522c4eb0c7e87a1c82f6a80924d9e 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2014-04-20  Michael Albinus  <michael.albinus@gmx.de>
+
+       * net/tramp-sh.el (tramp-get-ls-command): Use "-b" argument if
+       possible.
+
 2014-04-19  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * progmodes/sh-script.el (sh-smie--sh-keyword-p): Handle variable

diff --git a/lisp/net/tramp-sh.el b/lisp/net/tramp-sh.el
index 3b600e3d84e02a861135f409f3a1989e9afd0617..0dd5b79be924a741a5e7f6cdba718a7e19d390ed 100644 (file)
--- a/lisp/net/tramp-sh.el
+++ b/lisp/net/tramp-sh.el
@@ -4966,6 +4966,12 @@ Return ATTR."
                      vec (format
                           "%s --color=never -al /dev/null" result))
                 (setq result (concat result " --color=never")))
+              ;; This should support file names with special
+              ;; characters.  If this option is not supported, such
+              ;; file names might fail.
+              (when (tramp-send-command-and-check
+                     vec (format "%s -b /dev/null" result))
+                (setq result (concat result " -b")))
               (throw 'ls-found result))
             (setq dl (cdr dl))))))
      (tramp-error vec 'file-error "Couldn't find a proper `ls' command"))))