(dired-insert-directory): Force use of C locale.

1 files changed, 4 insertions, 0 deletions

diff --git a/lisp/dired.el b/lisp/dired.el
index 7da15bc2df0..6bf16084c00 100644
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -562,7 +562,11 @@ If DIRNAME is already in a dired buffer, that buffer is used without refresh."
   ;; inset all files listed in the cdr (the car is the passed-in directory
   ;; list).
   (let ((opoint (point))
+        (process-environment (copy-sequence process-environment))
         end)
+    ;; This makes sure that month names come out in English
+    ;; so we can find the start of the file name.
+    (setenv "LC_ALL" "C")
     (if (consp dir-or-list)
         ;; In this case, use the file names in the cdr
         ;; exactly as originally given to dired-noselect.