From ae9ed8459263b48b8c6aa82e08c19346ff73fa9f Mon Sep 17 00:00:00 2001
From: Jonathan Worthington <jnthn@jnthn.net>
Date: Wed, 28 Jul 2010 13:13:23 +0200
Subject: Fix the module installation scriopt for Win32. Works for me now.

---
 skel/build/module-install.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'skel')

diff --git a/skel/build/module-install.pl b/skel/build/module-install.pl
index cba32df..92c821b 100644
--- a/skel/build/module-install.pl
+++ b/skel/build/module-install.pl
@@ -21,7 +21,7 @@ while (@ARGV) {
         return unless /\.pm6?/;
         my $source = $File::Find::name;
         my $target = $source;
-        $target =~ s/$mlib/$perl6lib/;
+        $target =~ s/\Q$mlib\E/$perl6lib/;
         print "$source => $target\n";
         mkpath dirname($target);
         copy($source, $target) or die "copy failed: $!\n";
-- 
cgit v1.1