(insert-directory): Use \ before insert-directory-program

to ignore shell aliasing.

diff --git a/lisp/files.el b/lisp/files.el
index 6abe596ef014f0bac71daba6129ded810988fbbf..0003bd533fe4c3e6456157bde135be083b268a54 100644 (file)
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -2203,7 +2203,8 @@ If WILDCARD, it also runs the shell specified by `shell-file-name'."
                              (substring pattern (match-beginning 0)))
                      beg (1+ (match-end 0))))
              (call-process shell-file-name nil t nil
-                           "-c" (concat insert-directory-program
+                           "-c" (concat "\\"  ;; Disregard shell aliases!
+                                        insert-directory-program
                                         " -d "
                                         (if (stringp switches)
                                             switches