X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FHelper.pm;fp=lib%2FCatalyst%2FHelper.pm;h=94e17e348fca2db09f7f87071345bc14dfe53118;hb=8b0107a546938fd15588bcfe29dc6167592777ca;hp=3fba2777483dbdb9adbe7fc13e7404382226ef9e;hpb=47f36ce52b14c16a275d224ed95e8b821b9794c6;p=catagits%2FCatalyst-Devel.git

diff --git a/lib/Catalyst/Helper.pm b/lib/Catalyst/Helper.pm
index 3fba277..94e17e3 100644
--- a/lib/Catalyst/Helper.pm
+++ b/lib/Catalyst/Helper.pm
@@ -445,7 +445,7 @@ sub _mk_cgi {
     my $script    = $self->{script};
     my $appprefix = $self->{appprefix};
     $self->render_sharedir_file( file('script', 'myapp_cgi.pl.tt'),
-        file($script,"$appprefix\_cgi.pl"), undef, 0700 );
+        file($script,"$appprefix\_cgi.pl"), undef, 0755 );
 }
 
 sub _mk_fastcgi {
@@ -453,7 +453,7 @@ sub _mk_fastcgi {
     my $script    = $self->{script};
     my $appprefix = $self->{appprefix};
     $self->render_sharedir_file( file('script', 'myapp_fastcgi.pl.tt'),
-        file($script, "$appprefix\_fastcgi.pl"), undef, 0700 );
+        file($script, "$appprefix\_fastcgi.pl"), undef, 0755 );
 }
 
 sub _mk_server {
@@ -461,7 +461,7 @@ sub _mk_server {
     my $script    = $self->{script};
     my $appprefix = $self->{appprefix};
     $self->render_sharedir_file( file('script', 'myapp_server.pl.tt'),
-        file($script, "$appprefix\_server.pl"), undef, 0700 );
+        file($script, "$appprefix\_server.pl"), undef, 0755 );
 }
 
 sub _mk_test {
@@ -469,7 +469,7 @@ sub _mk_test {
     my $script    = $self->{script};
     my $appprefix = $self->{appprefix};
     $self->render_sharedir_file( file('script', 'myapp_test.pl.tt'),
-        file($script, "$appprefix\_test.pl"), undef, 0700 );
+        file($script, "$appprefix\_test.pl"), undef, 0755 );
 }
 
 sub _mk_create {
@@ -477,7 +477,7 @@ sub _mk_create {
     my $script    = $self->{script};
     my $appprefix = $self->{appprefix};
     $self->render_sharedir_file( file('script', 'myapp_create.pl.tt'),
-        file($script, "$appprefix\_create.pl"), undef, 0700 );
+        file($script, "$appprefix\_create.pl"), undef, 0755 );
 }
 
 sub _mk_compclass {