Re: tramp and how to source remote environment

[ramestica]

On Mar 5, 9:05 am, Michael Albinus <michael.albi...@gmx.de> wrote:
> I don't understand. Do you mean this line:
>
> (setq remote-path (delq 'tramp-default-remote-path remote-path)))
>
> This deletes the *symbol* `tramp-default-remote-path', and nothing else.

I mean the code after the comment ";; Remove non-existing
directories.".

In general I find a bit too intrusive from tramp to go and do
something with my PATH in the remote machine. I would like the call to
tramp-set-remote-pat in tramp-open-connection-setup-interactive-shell
to be a choice left to the user. What do you think of the attached
patch?

Rodrigo

 *** tramp.el.orig       2009-03-05 09:40:40.000000000 -0500
--- tramp.el    2009-03-05 08:48:53.000000000 -0500
***************
*** 871,876 ****
--- 871,881 ----
       (tramp-set-completion-function
        "fcp" tramp-completion-function-alist-ssh)))

+ (defcustom tramp-override-remote-path t
+   "To guess or not to guess a 'good' remote PATH."
+   :group 'tramp
+   :type 'boolean)
+
  (defconst tramp-echo-mark-marker "_echo"
    "String marker to surround echoed commands.")

***************
*** 6048,6054 ****
          500 0))))

    ;; Set remote PATH variable.
!   (tramp-set-remote-path vec)

    ;; Search for a good shell before searching for a command which
    ;; checks if a file exists. This is done because Tramp wants to
use
--- 6053,6060 ----
          500 0))))

    ;; Set remote PATH variable.
!   (if (eq tramp-override-remote-path t)
!       (tramp-set-remote-path vec))

    ;; Search for a good shell before searching for a command which
    ;; checks if a file exists. This is done because Tramp wants to
use