| f11fc34b |
1 | --- File-Rsync-0.32.old/Makefile.PL 2001-05-17 03:32:19.000000000 +0200 |
| 2 | +++ File-Rsync-0.32/Makefile.PL 2004-01-01 19:42:50.659170040 +0100 |
| 3 | @@ -18,7 +18,7 @@ |
| 4 | ABSTRACT => $ABSTRACT, |
| 5 | PL_FILES => { 'makepm.PL' => 'Config.pm' }, |
| 6 | PM => { 'Rsync.pm' => '$(INST_LIB)/File/Rsync.pm', |
| 7 | - 'Config.pm' => '$(INST_ARCHLIB)/File/Rsync/Config.pm' }, |
| 8 | + 'Config.pm' => '$(INST_LIB)/File/Rsync/Config.pm' }, |
| 9 | dist => { COMPRESS => 'gzip', SUFFIX => 'gz' }, |
| 10 | realclean => { FILES => 'Config.pm' }, |
| 11 | ); |
| 12 | --- File-Rsync-0.32.old/makepm.PL 2001-05-11 05:12:17.000000000 +0200 |
| 13 | +++ File-Rsync-0.32/makepm.PL 2004-01-01 19:37:09.339058584 +0100 |
| 14 | @@ -20,11 +20,7 @@ |
| 15 | (this is not recommended)). |
| 16 | |
| 17 | EOT |
| 18 | -$RSYNC||='/usr/local/bin/rsync'; |
| 19 | -print "Path to rsync [$RSYNC]: "; |
| 20 | -my $ans=<STDIN>; |
| 21 | -chomp $ans; |
| 22 | -$RSYNC=$ans || $RSYNC; |
| 23 | +$RSYNC||='/usr/bin/rsync'; |
| 24 | $RSYNC=~s/\\/\\\\/g; |
| 25 | $RSYNC=~s/\'/\\\'/g; |
| 26 | open IN,'Config.in' or die "Cannot read Config.in: $!\n"; |
| 27 | --- File-Rsync-0.32.old/Rsync.pm 2003-12-27 03:43:12.000000000 +0100 |
| 28 | +++ File-Rsync-0.32/Rsync.pm 2004-01-01 19:37:48.858050784 +0100 |
| 29 | @@ -35,8 +35,8 @@ |
| 30 | use File::Rsync; |
| 31 | |
| 32 | $obj = File::Rsync->new( { archive => 1, compress => 1, |
| 33 | - rsh => '/usr/local/bin/ssh', |
| 34 | - 'rsync-path' => '/usr/local/bin/rsync' } ); |
| 35 | + rsh => '/usr/bin/ssh', |
| 36 | + 'rsync-path' => '/usr/bin/rsync' } ); |
| 37 | |
| 38 | $obj->exec( { src => 'localdir', dest => 'rhost:remdir' } ) |
| 39 | or warn "rsync failed\n"; |
projects / packages / perl-File-Rsync.git / blame