[slime-devel] Re: tramp-make-tramp-file-name

[Alexey Antipov]

Marco Baringer <mb <at> bese.it> writes:

> 
> 
> my version of tramp-make-tramp-file-name (emacs 22.0.50.1) takes 5
> arguments, not 4 as in slime-create-filename-translator. is this a bug
> or does this function have a differenet api on other emacs?
> 

I use old tramp from 2.0.44 from debian sarge. And that
tramp-make-tramp-filename accepts five arguments.
I propose following solution:

====
1283a1284,1295
> (defun slime-make-tramp-file-name (username remote-host lisp-filename)
>   "Old (with multi-hops) tramp compatability function"
>   (if (boundp 'tramp-multi-methods)
>       (tramp-make-tramp-file-name nil nil
>                                 username
>                                 remote-host
>                                 lisp-filename)
>       (tramp-make-tramp-file-name nil
>                                 username
>                                 remote-host
>                                 lisp-filename)))
> 
1307c1319
<             (tramp-make-tramp-file-name nil
---
>             (slime-make-tramp-file-name
====