Re: tramp fails for su when not having English prompt

[Michael Albinus]

Ulrich Mueller <address@hidden> writes:

>> Gentoo Emacs: Should we bring out a new revision of Emacs 22 with
>> this bug fixed
>
> Emacs 22 still has TRAMP 2.0.x, so a different patch would be needed.
>
> Michael, do you intend to fix this also in the Emacs 22 base branch?

Yep, just committed the patch below.

> Ulrich

Best regards, Michael.

magdalene:~/src/emacs-22> cvs diff -r 1.124.2.7 lisp/net/tramp.el
Index: lisp/net/tramp.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/net/tramp.el,v
retrieving revision 1.124.2.7
retrieving revision 1.124.2.8
diff -u -r1.124.2.7 -r1.124.2.8
--- lisp/net/tramp.el   6 Oct 2007 15:25:50 -0000       1.124.2.7
+++ lisp/net/tramp.el   31 Oct 2007 20:48:52 -0000      1.124.2.8
@@ -5712,6 +5712,7 @@
                   (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 @@
        (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 @@
                   (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 @@
     (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))