[Catalyst-commits] r6305 - in trunk/Catalyst-Action-RenderView: .
lib/Catalyst/Action t/lib
bricas at dev.catalyst.perl.org
bricas at dev.catalyst.perl.org
Thu Apr 26 15:47:04 GMT 2007
Author: bricas
Date: 2007-04-26 15:47:03 +0100 (Thu, 26 Apr 2007)
New Revision: 6305
Added:
trunk/Catalyst-Action-RenderView/MANIFEST.SKIP
trunk/Catalyst-Action-RenderView/README
Removed:
trunk/Catalyst-Action-RenderView/Build.PL
Modified:
trunk/Catalyst-Action-RenderView/Changes
trunk/Catalyst-Action-RenderView/Makefile.PL
trunk/Catalyst-Action-RenderView/lib/Catalyst/Action/RenderView.pm
trunk/Catalyst-Action-RenderView/t/lib/TestApp.pm
Log:
switch to Module::Install. remove -Debug from TestApp.pm
Deleted: trunk/Catalyst-Action-RenderView/Build.PL
===================================================================
--- trunk/Catalyst-Action-RenderView/Build.PL 2007-04-25 14:35:17 UTC (rev 6304)
+++ trunk/Catalyst-Action-RenderView/Build.PL 2007-04-26 14:47:03 UTC (rev 6305)
@@ -1,17 +0,0 @@
-use strict;
-use Module::Build;
-
-my $build = Module::Build->new(
- create_makefile_pl => 'passthrough',
- license => 'perl',
- module_name => 'Catalyst::Action::RenderView',
- requires => {
- 'Catalyst' => 5.70
- },
- create_readme => 1,
- create_makefile_pl => 'passthrough',
- test_files => [
- glob('t/*.t')
- ]
-);
-$build->create_build_script;
Modified: trunk/Catalyst-Action-RenderView/Changes
===================================================================
--- trunk/Catalyst-Action-RenderView/Changes 2007-04-25 14:35:17 UTC (rev 6304)
+++ trunk/Catalyst-Action-RenderView/Changes 2007-04-26 14:47:03 UTC (rev 6305)
@@ -1,3 +1,6 @@
+0.05 2007-04-26
+ - switch to Module::Install
+
0.04 2006-07-04 09:21:00
- That debug code wasn't quite production ready : /
Added: trunk/Catalyst-Action-RenderView/MANIFEST.SKIP
===================================================================
--- trunk/Catalyst-Action-RenderView/MANIFEST.SKIP (rev 0)
+++ trunk/Catalyst-Action-RenderView/MANIFEST.SKIP 2007-04-26 14:47:03 UTC (rev 6305)
@@ -0,0 +1,29 @@
+# Avoid version control files.
+\bRCS\b
+\bCVS\b
+,v$
+\B\.svn\b
+
+# Avoid Makemaker generated and utility files.
+\bMakefile$
+\bblib
+\bMakeMaker-\d
+\bpm_to_blib$
+\bblibdirs$
+^MANIFEST\.SKIP$
+
+# Avoid Module::Build generated and utility files.
+\bBuild$
+\b_build
+
+# Avoid temp and backup files.
+~$
+\.tmp$
+\.old$
+\.bak$
+\#$
+\b\.#
+\.DS_Store$
+
+# No tarballs!
+\.gz$
Modified: trunk/Catalyst-Action-RenderView/Makefile.PL
===================================================================
--- trunk/Catalyst-Action-RenderView/Makefile.PL 2007-04-25 14:35:17 UTC (rev 6304)
+++ trunk/Catalyst-Action-RenderView/Makefile.PL 2007-04-26 14:47:03 UTC (rev 6305)
@@ -1,31 +1,10 @@
-# Note: this file was auto-generated by Module::Build::Compat version 0.03
-
- unless (eval "use Module::Build::Compat 0.02; 1" ) {
- print "This module requires Module::Build to install itself.\n";
-
- require ExtUtils::MakeMaker;
- my $yn = ExtUtils::MakeMaker::prompt
- (' Install Module::Build now from CPAN?', 'y');
-
- unless ($yn =~ /^y/i) {
- die " *** Cannot install without Module::Build. Exiting ...\n";
- }
-
- require Cwd;
- require File::Spec;
- require CPAN;
-
- # Save this 'cause CPAN will chdir all over the place.
- my $cwd = Cwd::cwd();
-
- CPAN::Shell->install('Module::Build::Compat');
- CPAN::Shell->expand("Module", "Module::Build::Compat")->uptodate
- or die "Couldn't install Module::Build, giving up.\n";
-
- chdir $cwd or die "Cannot chdir() back to $cwd: $!";
- }
- eval "use Module::Build::Compat 0.02; 1" or die $@;
-
- Module::Build::Compat->run_build_pl(args => \@ARGV);
- require Module::Build;
- Module::Build::Compat->write_makefile(build_class => 'Module::Build');
+use inc::Module::Install 0.65;
+
+name 'Catalyst-Action-RenderView';
+all_from 'lib/Catalyst/Action/RenderView.pm';
+
+requires 'Catalyst' => '5.70';
+requires 'Test::More';
+
+auto_install;
+WriteAll;
Added: trunk/Catalyst-Action-RenderView/README
===================================================================
--- trunk/Catalyst-Action-RenderView/README (rev 0)
+++ trunk/Catalyst-Action-RenderView/README 2007-04-26 14:47:03 UTC (rev 6305)
@@ -0,0 +1,53 @@
+NAME
+ Catalyst::Action::RenderView - Sensible default end action.
+
+SYNOPSIS
+ sub end : ActionClass('RenderView') {}
+
+DESCRIPTION
+ This action implements a sensible default end action, which will forward
+ to the first available view, unless status is set to 3xx, or there is a
+ response body. It also allows you to pass "dump_info=1" to the url in
+ order to force a debug screen, while in debug mode.
+
+ If you have more than one view, you can specify which one to use with
+ the "default_view" config setting (see ""$c-" in Catalystview($name)">.)
+
+METHODS
+ end The default "end" action. You can override this as required in your
+ application class; normal inheritance applies.
+
+INTERNAL METHODS
+ execute
+ Dispatches control to superclasses, then forwards to the default
+ View.
+
+ See "METHODS/action" in Catalyst::Action.
+
+EXTENDING
+ To add something to an "end" action that is called before rendering,
+ simply place it in the "end" method:
+
+ sub end : ActionClass('RenderView') {
+ my ( $self, $c ) = @_;
+ # do stuff here; the RenderView action is called afterwards
+ }
+
+ To add things to an "end" action that are called *after* rendering, you
+ can set it up like this:
+
+ sub render : ActionClass('RenderView') { }
+
+ sub end : Private {
+ my ( $self, $c ) = @_;
+ $c->forward('render');
+ # do stuff here
+ }
+
+AUTHOR
+ Marcus Ramberg <marcus at thefeed.no>
+
+LICENSE
+ This library is free software. You can redistribute it and/or modify it
+ under the same terms as Perl itself.
+
Modified: trunk/Catalyst-Action-RenderView/lib/Catalyst/Action/RenderView.pm
===================================================================
--- trunk/Catalyst-Action-RenderView/lib/Catalyst/Action/RenderView.pm 2007-04-25 14:35:17 UTC (rev 6304)
+++ trunk/Catalyst-Action-RenderView/lib/Catalyst/Action/RenderView.pm 2007-04-26 14:47:03 UTC (rev 6305)
@@ -1,6 +1,6 @@
package Catalyst::Action::RenderView;
-our $VERSION='0.04';
+our $VERSION='0.05';
use base 'Catalyst::Action';
Modified: trunk/Catalyst-Action-RenderView/t/lib/TestApp.pm
===================================================================
--- trunk/Catalyst-Action-RenderView/t/lib/TestApp.pm 2007-04-25 14:35:17 UTC (rev 6304)
+++ trunk/Catalyst-Action-RenderView/t/lib/TestApp.pm 2007-04-26 14:47:03 UTC (rev 6305)
@@ -1,7 +1,7 @@
package TestApp;
use strict;
-use Catalyst qw/-Debug/;
+use Catalyst;
our $VERSION = '0.01';
More information about the Catalyst-commits
mailing list