Use URL directly in rsync rather than breaking it
authorNigel Metheringham <nigel@exim.org>
Wed, 23 Jun 2010 11:46:27 +0000 (12:46 +0100)
committerNigel Metheringham <nigel@exim.org>
Wed, 23 Jun 2010 11:46:27 +0000 (12:46 +0100)
mirmon/probe

index 717cb16895e78a0bb73ed888ead899631aab567f..fd6a5f860108206218f5ff4b90bc67e970c6ea6e 100755 (executable)
@@ -52,13 +52,11 @@ my $opt_q = '' ; $opt_q = '-q' if $opt{q} ;
 # handle ftp/http urls with wget
 
 if ( $url =~ m!^rsync://(.*)$! )
 # handle ftp/http urls with wget
 
 if ( $url =~ m!^rsync://(.*)$! )
-  { my $src = $1 ;
-    my $dst = $src ;
+  { my $dst = $1 ;
     $dst =~ s![/\s]!_!g ;
     my $TMP = "$tmp_dir/$dst" ;
     $dst =~ s![/\s]!_!g ;
     my $TMP = "$tmp_dir/$dst" ;
-    $src =~ s!/!::! ;
     unlink $TMP ; # ignore status
     unlink $TMP ; # ignore status
-    my $cmd = "$RSYNC $opt_v $opt_q --no-motd --timeout $timeout $src $TMP" ;
+    my $cmd = "$RSYNC $opt_v $opt_q --no-motd --timeout $timeout $url $TMP" ;
     Warn sprintf "'%s'\n", $cmd if $opt{d} ;
     system $cmd ;
     if ( open TMP, $TMP )
     Warn sprintf "'%s'\n", $cmd if $opt{d} ;
     system $cmd ;
     if ( open TMP, $TMP )