/[tramp]/tramp/lisp/tramp.el
ViewVC logotype

Diff of /tramp/lisp/tramp.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 2.210 by kai, Thu Sep 12 16:33:59 2002 UTC revision 2.211 by kai, Fri Sep 13 10:12:30 2002 UTC
# Line 72  Line 72 
72  ;; In the Tramp CVS repository, the version numer is auto-frobbed from  ;; In the Tramp CVS repository, the version numer is auto-frobbed from
73  ;; the Makefile, so you should edit the top-level Makefile to change  ;; the Makefile, so you should edit the top-level Makefile to change
74  ;; the version number.  ;; the version number.
75  (defconst tramp-version "2.0.17"  (defconst tramp-version "2.0.18"
76    "This version of tramp.")    "This version of tramp.")
77    
78  (defconst tramp-bug-report-address "tramp-devel@mail.freesoftware.fsf.org"  (defconst tramp-bug-report-address "tramp-devel@mail.freesoftware.fsf.org"
# Line 1491  use strict; Line 1491  use strict;
1491    
1492  my %%trans = do {  my %%trans = do {
1493      my $i = 0;      my $i = 0;
1494      map {($_, sprintf(q(%%06b), $i++))}      map {($_, substr(unpack(q(B8), chr $i++), 2, 6))}
1495        split //, q(ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/)        split //, q(ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/)
1496  };  };
1497    
# Line 1512  while (my $data = <STDIN>) { Line 1512  while (my $data = <STDIN>) {
1512      $pending .= $data;      $pending .= $data;
1513    
1514      my $len = length($pending);      my $len = length($pending);
1515      my $chunk = substr($pending, 0, $len & ~3, q());      my $chunk = substr($pending, 0, $len & ~3);
1516    
1517      # Easy method: translate from chars to (pregenerated) six-bit packets, join,      # Easy method: translate from chars to (pregenerated) six-bit packets, join,
1518      # split in 8-bit chunks and convert back to char.      # split in 8-bit chunks and convert back to char.

Legend:
Removed from v.2.210  
changed lines
  Added in v.2.211

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26