From: Brian Cassidy <bricas@cpan.org>
Date: Fri, 2 Jun 2006 01:12:18 +0000 (+0000)
Subject: script gen updates
X-Git-Tag: 1.09~55
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=9ffb6b831e52a98ed741cf1bfb43fd75f1c44a4f;p=catagits%2FCatalyst-Devel.git

script gen updates
---

diff --git a/lib/Catalyst/Devel.pm b/lib/Catalyst/Devel.pm
index 4c3686a..c6129b3 100644
--- a/lib/Catalyst/Devel.pm
+++ b/lib/Catalyst/Devel.pm
@@ -3,7 +3,8 @@ package Catalyst::Devel;
 use strict;
 use warnings;
 
-our VERSION = '1.00';
+our $VERSION              = '1.00';
+our $CATALYST_SCRIPT_GEN = 28;
 
 =head1 NAME
 
diff --git a/lib/Catalyst/Helper.pm b/lib/Catalyst/Helper.pm
index 75a9a37..a6a36e0 100644
--- a/lib/Catalyst/Helper.pm
+++ b/lib/Catalyst/Helper.pm
@@ -9,6 +9,7 @@ use File::Path;
 use IO::File;
 use FindBin;
 use Template;
+use Catalyst::Devel;
 use Catalyst::Utils;
 use Catalyst::Exception;
 
@@ -74,7 +75,7 @@ sub mk_app {
     $self->{script          } = File::Spec->catdir( $self->{dir}, 'script' );
     $self->{appprefix       } = Catalyst::Utils::appprefix($name);
     $self->{startperl       } = "#!$Config{perlpath} -w";
-    $self->{scriptgen       } = $Catalyst::CATALYST_SCRIPT_GEN || 4;
+    $self->{scriptgen       } = $Catalyst::Devel::CATALYST_SCRIPT_GEN || 4;
     $self->{catalyst_version} = $Catalyst::VERSION;
     $self->{author          } = $self->{author} = $ENV{'AUTHOR'}
       || eval { @{ [ getpwuid($<) ] }[6] }