From: Tomas Doran <bobtfish@bobtfish.net>
Date: Fri, 21 Oct 2011 22:51:37 +0000 (-0700)
Subject: Fix generated Makefile.PL on win32. RT#65456
X-Git-Tag: 1.36~3
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Devel.git;a=commitdiff_plain;h=f7cb00cba7691450951604832e1b4ac5759c5d65

Fix generated Makefile.PL on win32. RT#65456
---

diff --git a/Changes b/Changes
index cb1d690..4632cb3 100644
--- a/Changes
+++ b/Changes
@@ -1,5 +1,7 @@
 This file documents the revision history for Perl extension Catalyst-Devel.
 
+        - Fix generated Makefile.PL to always contain unix style paths,
+          even on Win32. RT#65456
         - Fix tests generated for controllers generated with --mechanize
           to work with newer versions of Test::WWW::Mechanize::Catalyst
         - bump Module::Install dep to 1.02
diff --git a/lib/Catalyst/Helper.pm b/lib/Catalyst/Helper.pm
index 976de96..f215564 100644
--- a/lib/Catalyst/Helper.pm
+++ b/lib/Catalyst/Helper.pm
@@ -388,7 +388,7 @@ sub _mk_rootclass {
 
 sub _mk_makefile {
     my $self = shift;
-    $self->{path} = dir( 'lib', split( '::', $self->{name} ) );
+    $self->{path} = join('/', 'lib', split( '::', $self->{name} ) );
     $self->{path} .= '.pm';
     my $dir = $self->{dir};
     $self->render_sharedir_file( 'Makefile.PL.tt', file($dir, "Makefile.PL") );