2 files changed, 10 insertions, 0 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c6326fed8c3..452d7d7707d 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2007-10-31  Michael Albinus  <michael.albinus@gmx.de>
+
+        * net/tramp.el (tramp-open-connection-telnet)
+        (tramp-open-connection-rsh, tramp-open-connection-su)
+        (tramp-open-connection-multi): Set $LC_ALL to "C".
+
 2007-10-31  Sven Joachim  <svenjoac@gmx.de>
 
         * dired-aux.el (dired-copy-file-recursive):
diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el
index 4bff0f8ee3f..d40d0c75813 100644
--- a/lisp/net/tramp.el
+++ b/lisp/net/tramp.el
@@ -5712,6 +5712,7 @@ Maybe the different regular expressions need to be tuned.
                    (or user (user-login-name)) host method)
     (let ((process-environment (copy-sequence process-environment)))
       (setenv "TERM" tramp-terminal-type)
+      (setenv "LC_ALL" "C")
       (setenv "PROMPT_COMMAND")
       (setenv "PS1" "$ ")
       (let* ((default-directory (tramp-temporary-file-directory))
@@ -5794,6 +5795,7 @@ arguments, and xx will be used as the host name to connect to.
         (setq login-args (cons "-p" (cons (match-string 2 host) login-args)))
         (setq real-host (match-string 1 host)))
       (setenv "TERM" tramp-terminal-type)
+      (setenv "LC_ALL" "C")
       (setenv "PROMPT_COMMAND")
       (setenv "PS1" "$ ")
       (let* ((default-directory (tramp-temporary-file-directory))
@@ -5847,6 +5849,7 @@ prompt than you do, so it is not at all unlikely that the variable
                    (or user "<root>") method)
     (let ((process-environment (copy-sequence process-environment)))
       (setenv "TERM" tramp-terminal-type)
+      (setenv "LC_ALL" "C")
       (setenv "PROMPT_COMMAND")
       (setenv "PS1" "$ ")
       (let* ((default-directory (tramp-temporary-file-directory))
@@ -5913,6 +5916,7 @@ log in as u2 to h2."
     (tramp-message 7 "Opening `%s' connection..." multi-method)
     (let ((process-environment (copy-sequence process-environment)))
       (setenv "TERM" tramp-terminal-type)
+      (setenv "LC_ALL" "C")
       (setenv "PROMPT_COMMAND")
       (setenv "PS1" "$ ")
       (let* ((default-directory (tramp-temporary-file-directory))