Fix git:// URLs on win32; escape %

Signed-off-by: Moritz Lenz <moritz@faui2k3.org>
rakudo · Oct 2, 2010 · 7c74c0c · 7c74c0c
1 parent d2e8634
commit 7c74c0c
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/Configure.pl b/Configure.pl
@@ -171,7 +171,8 @@ sub create_makefile {
     if ($^O eq 'MSWin32') {
         $maketext =~ s{/}{\\}g;
         $maketext =~ s{\\\*}{\\\\*}g;
-        $maketext =~ s{http:\S+}{ do {my $t = $&; $t =~ s'\\'/'g; $t} }eg;
+        $maketext =~ s{(?:git|http):\S+}{ do {my $t = $&; $t =~ s'\\'/'g; $t} }eg;
+        $maketext =~ s/.*curl.*/do {my $t = $&; $t =~ s'%'%%'g; $t}/meg;
     }
 
     if ($makefile_timing) {