diff options
Diffstat (limited to 'www/w3mir/files/patch-aa')
-rw-r--r-- | www/w3mir/files/patch-aa | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/www/w3mir/files/patch-aa b/www/w3mir/files/patch-aa new file mode 100644 index 000000000000..5c64be77bbd7 --- /dev/null +++ b/www/w3mir/files/patch-aa @@ -0,0 +1,13 @@ +--- w3mir.PL.orig Mon Feb 5 00:21:47 2001 ++++ w3mir.PL Sun Apr 17 21:43:30 2005 +@@ -648,8 +648,10 @@ + $rum_url_o = url $rum_url_o + unless ref $rum_url_o; + ++ my($slash)=($lf_url =~ /^\//); + # Derive a filename from the url, the filename contains no URL-quoting + my($lf_name) = (url "file:$lf_url")->unix_path; ++ $lf_name =~ s~^/~~ if (!$slash); + + # Make all intermediate directories + &mkdir($lf_name) if $s==0; |