sometimes consistency is not a bad thing either.
Florian Ragwitz [Sun, 6 Dec 2009 13:45:33 +0000 (13:45 +0000)]
share/lib/MyApp.pm.tt
share/lib/MyApp/Controller/Root.pm.tt
share/script/myapp_fastcgi.pl.tt
share/script/myapp_server.pl.tt
share/script/myapp_test.pl.tt
share/t/01app.t.tt
share/t/02pod.t.tt
share/t/03podcoverage.t.tt
share/t/comptest.tt

index a1fa271..19f3f57 100644 (file)
@@ -13,7 +13,7 @@ use Catalyst::Runtime 5.80;
 #                 directory
 
 use Catalyst qw/
-       -Debug
+    -Debug
     ConfigLoader
     Static::Simple
 /;
@@ -33,9 +33,9 @@ $VERSION = eval $VERSION;
 # local deployment.
 
 __PACKAGE__->config(
-       name => '[% name %]',
-       # Disable deprecated behavior needed by old applications
-       disable_component_resolution_regex_fallback => 1, 
+    name => '[% name %]',
+    # Disable deprecated behavior needed by old applications
+    disable_component_resolution_regex_fallback => 1,
 );
 
 # Start the application
index 24795f6..e911ca8 100644 (file)
@@ -65,3 +65,5 @@ it under the same terms as Perl itself.
 =cut
 
 __PACKAGE__->meta->make_immutable;
+
+1;
index c389358..d45d218 100644 (file)
@@ -1,7 +1,7 @@
 [% startperl %]
 
 use Catalyst::ScriptRunner;
-Catalyst::ScriptRunner->run('[% name %]','FastCGI');
+Catalyst::ScriptRunner->run('[% name %]', 'FastCGI');
 
 1;
 
index 5362241..a5de7cd 100644 (file)
@@ -1,7 +1,7 @@
 [% startperl %]
 
 BEGIN {
-    $ENV{CATALYST_SCRIPT_GEN} = [% scriptgen %] 
+    $ENV{CATALYST_SCRIPT_GEN} = [% scriptgen %];
 }
 
 use Catalyst::ScriptRunner;
index b00026e..8929202 100644 (file)
@@ -1,7 +1,7 @@
 [% startperl %]
 
 use Catalyst::ScriptRunner;
-Catalyst::ScriptRunner->run('[% name %]','Test');
+Catalyst::ScriptRunner->run('[% name %]', 'Test');
 
 1;
 
index 7a14cbb..d0f43dd 100644 (file)
@@ -8,4 +8,3 @@ BEGIN { use_ok 'Catalyst::Test', '[% name %]' }
 ok( request('/')->is_success, 'Request should succeed' );
 
 done_testing();
-1;
index 36a814f..64fabdd 100644 (file)
@@ -8,4 +8,3 @@ plan skip_all => 'Test::Pod 1.14 required' if $@;
 plan skip_all => 'set TEST_POD to enable this test' unless $ENV{TEST_POD};
 
 all_pod_files_ok();
-1;
index 37ab26e..38147ef 100644 (file)
@@ -8,4 +8,3 @@ plan skip_all => 'Test::Pod::Coverage 1.04 required' if $@;
 plan skip_all => 'set TEST_POD to enable this test' unless $ENV{TEST_POD};
 
 all_pod_coverage_ok();
-1;
index d46300b..1e38a12 100644 (file)
@@ -5,7 +5,7 @@ use warnings;
 eval "use Test::WWW::Mechanize::Catalyst '[% name %]'";
 if ($@) {
     plan skip_all => 'Test::WWW::Mechanize::Catalyst required';
-       exit 0;
+    exit 0;
 }
 
 ok( my $mech = Test::WWW::Mechanize::Catalyst->new, 'Created mech object' );
@@ -24,4 +24,3 @@ BEGIN { use_ok '[% class %]' }
 [% END -%]
 
 done_testing();
-1;