tramp-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: tramp (2.0.25); save breaks with [rs]sh


From: Kai Großjohann
Subject: Re: tramp (2.0.25); save breaks with [rs]sh
Date: Wed, 27 Nov 2002 10:20:28 +0100
User-agent: Gnus/5.090008 (Oort Gnus v0.08) Emacs/21.3.50 (i686-pc-linux-gnu)

Dan Debertin <address@hidden> writes:

> Saving a buffer (one large enough to cause tramp to load tramp-uu.el)

Does this mean that the invocation of tramp-uu depends on the size of
the buffer?  I'm quite surprised.

> using rsh or ssh results in the following error for me:
>
> tramp: Encoding region using function...
> Loading tramp-uu...
> Invalid function: (macro . #[(place &optional x) 
> ("/usr/local/share/emacs/21.2/lisp/emacs-lisp/cl.elc" . 1750) nil 5 
> ("/usr/local/share/emacs/21.2/lisp/emacs-lisp/cl.elc" . 1536)])
>
> The remote machine is running Solaris 2.5.1, on which my login shell is
> (pd)ksh, though tramp seems to be invoking bash regardless. It works
> fine with ftp.
>
> More information available upon request. Thanks.

Please try this patch.  I have no idea what will happen, but maybe
it's useful to try.

--- tramp-uu.el.~2.1.~  2002-09-13 23:19:48.000000000 +0200
+++ tramp-uu.el 2002-11-27 10:18:08.000000000 +0100
@@ -36,7 +36,7 @@
     (mapcar (lambda (c)
              (prog1
                  (cons c i)
-               (incf i)))
+               (setq i (1+ i))))
            tramp-uu-b64-alphabet))
   "Alist of mapping from base64 character to its byte.")
 
@@ -65,7 +65,7 @@
            ;; "=" means padding.  Insert "`" instead.
            (insert "`")
          (insert (tramp-uu-byte-to-uu-char (tramp-uu-b64-char-to-byte c))))
-       (incf i)
+       (setq i (1+ i))
        ;; Every 60 characters, add "M" at beginning of line (as
        ;; length byte) and insert a newline.
        (when (zerop (% i 60))


-- 
~/.signature is: umop ap!sdn    (Frank Nobis)




reply via email to

[Prev in Thread] Current Thread [Next in Thread]