Use URL directly in rsync rather than breaking it

diff --git a/mirmon/probe b/mirmon/probe
index 717cb16895e78a0bb73ed888ead899631aab567f..fd6a5f860108206218f5ff4b90bc67e970c6ea6e 100755 (executable)
--- a/mirmon/probe
+++ b/mirmon/probe
@@ -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 )