perl-File-Rsync-misc.patch

   1 diff -Nur File-Rsync-0.42.ori/Makefile.PL File-Rsync-0.42.mod/Makefile.PL
   2 --- File-Rsync-0.42.ori/Makefile.PL     2005-06-25 00:02:32.000000000 +0200
   3 +++ File-Rsync-0.42.mod/Makefile.PL     2006-01-22 13:43:33.000000000 +0100
   4 @@ -17,10 +17,10 @@
   5        AUTHOR         => $AUTHOR,
   6        ABSTRACT       => $ABSTRACT,
   7        PREREQ_PM      => { 'Scalar::Util' => 0 },
   8 -      PL_FILES       => { 'makepm.PL' => 'config.pm' },
   9 +      PL_FILES       => { 'makepm.PL' => 'Config.pm' },
  10        PM             => { 'Rsync.pm'  => '$(INST_LIB)/File/Rsync.pm',
  11 -                         'config.pm' => '$(INST_ARCHLIB)/File/Rsync/Config.pm' },
  12 +                         'Config.pm' => '$(INST_LIB)/File/Rsync/Config.pm' },
  13        dist           => { COMPRESS => 'gzip', SUFFIX => 'gz' },
  14 -      realclean      => { FILES => 'config.pm' },
  15 +      realclean      => { FILES => 'Config.pm' },
  16  );
  17
  18 diff -Nur File-Rsync-0.42.ori/makepm.PL File-Rsync-0.42.mod/makepm.PL
  19 --- File-Rsync-0.42.ori/makepm.PL       2005-06-24 23:56:33.000000000 +0200
  20 +++ File-Rsync-0.42.mod/makepm.PL       2006-01-22 13:42:09.000000000 +0100
  21 @@ -20,15 +20,15 @@
  22  (this is not recommended)).
  23
  24  EOT
  25 -$RSYNC||='/usr/local/bin/rsync';
  26 -print "Path to rsync [$RSYNC]: ";
  27 -my $ans=<STDIN>;
  28 -chomp $ans;
  29 -$RSYNC=$ans || $RSYNC;
  30 -$RSYNC=~s/\\/\\\\/g;
  31 -$RSYNC=~s/\'/\\\'/g;
  32 +$RSYNC||='/usr/bin/rsync';
  33 +#print "Path to rsync [$RSYNC]: ";
  34 +#my $ans=<STDIN>;
  35 +#chomp $ans;
  36 +#$RSYNC=$ans || $RSYNC;
  37 +#$RSYNC=~s/\\/\\\\/g;
  38 +#$RSYNC=~s/\'/\\\'/g;
  39  open IN,'config.in' or die "Cannot read config.in: $!\n";
  40 -open OUT,'>config.pm' or die "Cannot write config.pm: $!\n";
  41 +open OUT,'>Config.pm' or die "Cannot write Config.pm: $!\n";
  42  while (<IN>) {
  43     if (/^(\s*rsync_path\s*=>)/) { print OUT "$1 '$RSYNC',\n" }
  44     else                                  { print OUT }