From: Tomas Doran Date: Wed, 2 Sep 2009 00:48:38 +0000 (+0000) Subject: Remove unused TestApp X-Git-Tag: 5.80014_02~72 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=76391998dd567625c9199fb4d51d9180572827a6;hp=573a513538078c7107d79878bd03512d0d292704;p=catagits%2FCatalyst-Runtime.git Remove unused TestApp --- diff --git a/t/TestApp/Changes b/t/TestApp/Changes deleted file mode 100644 index f1a3fe6..0000000 --- a/t/TestApp/Changes +++ /dev/null @@ -1,4 +0,0 @@ -This file documents the revision history for Perl extension TestApp. - -0.01 2009-06-24 17:26:08 - - initial revision, generated by Catalyst diff --git a/t/TestApp/Makefile.PL b/t/TestApp/Makefile.PL deleted file mode 100644 index 6d71806..0000000 --- a/t/TestApp/Makefile.PL +++ /dev/null @@ -1,20 +0,0 @@ -#!/usr/bin/env perl -# IMPORTANT: if you delete this file your app will not work as -# expected. You have been warned. -use inc::Module::Install; - -name 'TestApp'; -all_from 'lib/TestApp.pm'; - -requires 'Catalyst::Runtime' => '5.80004'; -requires 'Catalyst::Plugin::ConfigLoader'; -requires 'Catalyst::Plugin::Static::Simple'; -requires 'Catalyst::Action::RenderView'; -requires 'parent'; -requires 'Config::General'; # This should reflect the config file format you've chosen - # See Catalyst::Plugin::ConfigLoader for supported formats -catalyst; - -install_script glob('script/*.pl'); -auto_install; -WriteAll; diff --git a/t/TestApp/README b/t/TestApp/README deleted file mode 100644 index 4fc8775..0000000 --- a/t/TestApp/README +++ /dev/null @@ -1 +0,0 @@ -Run script/testapp_server.pl to test the application. diff --git a/t/TestApp/lib/TestApp.pm b/t/TestApp/lib/TestApp.pm deleted file mode 100644 index 5dd463a..0000000 --- a/t/TestApp/lib/TestApp.pm +++ /dev/null @@ -1,64 +0,0 @@ -package TestApp; - -use strict; -use warnings; - -use Catalyst::Runtime 5.80; - -# Set flags and add plugins for the application -# -# -Debug: activates the debug mode for very useful log messages -# ConfigLoader: will load the configuration from a Config::General file in the -# application's home directory -# Static::Simple: will serve static files from the application's root -# directory - -use parent qw/Catalyst/; -use Catalyst qw/ - ConfigLoader - Static::Simple/; -our $VERSION = '0.01'; - -# Configure the application. -# -# Note that settings in testapp.conf (or other external -# configuration file that you set up manually) take precedence -# over this when using ConfigLoader. Thus configuration -# details given here can function as a default configuration, -# with an external configuration file acting as an override for -# local deployment. - -__PACKAGE__->config( name => 'TestApp' ); - -# Start the application -__PACKAGE__->setup(); - - -=head1 NAME - -TestApp - Catalyst based application - -=head1 SYNOPSIS - - script/testapp_server.pl - -=head1 DESCRIPTION - -[enter your description here] - -=head1 SEE ALSO - -L, L - -=head1 AUTHOR - -Devin Austin,,, - -=head1 LICENSE - -This library is free software. You can redistribute it and/or modify -it under the same terms as Perl itself. - -=cut - -1; diff --git a/t/TestApp/lib/TestApp/Controller/Root.pm b/t/TestApp/lib/TestApp/Controller/Root.pm deleted file mode 100644 index bf6e1f4..0000000 --- a/t/TestApp/lib/TestApp/Controller/Root.pm +++ /dev/null @@ -1,67 +0,0 @@ -package TestApp::Controller::Root; - -use strict; -use warnings; -use parent 'Catalyst::Controller'; - -# -# Sets the actions in this controller to be registered with no prefix -# so they function identically to actions created in MyApp.pm -# -__PACKAGE__->config->{namespace} = ''; - -=head1 NAME - -TestApp::Controller::Root - Root Controller for TestApp - -=head1 DESCRIPTION - -[enter your description here] - -=head1 METHODS - -=cut - -=head2 index - -=cut - -sub index :Path :Args(0) { - my ( $self, $c ) = @_; - - # Hello World - $c->response->body( $c->welcome_message ); -} - -sub default :Path { - my ( $self, $c ) = @_; - $c->response->body( 'Page not found' ); - $c->response->status(404); -} - -sub test : Local { - my ($self, $c) = @_; - - $c->res->body("herro!"); -} - -=head2 end - -Attempt to render a view, if needed. - -=cut - -sub end : ActionClass('RenderView') {} - -=head1 AUTHOR - -Devin Austin,,, - -=head1 LICENSE - -This library is free software. You can redistribute it and/or modify -it under the same terms as Perl itself. - -=cut - -1; diff --git a/t/TestApp/root/favicon.ico b/t/TestApp/root/favicon.ico deleted file mode 100644 index 5ad723d..0000000 Binary files a/t/TestApp/root/favicon.ico and /dev/null differ diff --git a/t/TestApp/root/static/images/btn_120x50_built.png b/t/TestApp/root/static/images/btn_120x50_built.png deleted file mode 100644 index c709fd6..0000000 Binary files a/t/TestApp/root/static/images/btn_120x50_built.png and /dev/null differ diff --git a/t/TestApp/root/static/images/btn_120x50_built_shadow.png b/t/TestApp/root/static/images/btn_120x50_built_shadow.png deleted file mode 100644 index 15142fe..0000000 Binary files a/t/TestApp/root/static/images/btn_120x50_built_shadow.png and /dev/null differ diff --git a/t/TestApp/root/static/images/btn_120x50_powered.png b/t/TestApp/root/static/images/btn_120x50_powered.png deleted file mode 100644 index 7249b47..0000000 Binary files a/t/TestApp/root/static/images/btn_120x50_powered.png and /dev/null differ diff --git a/t/TestApp/root/static/images/btn_120x50_powered_shadow.png b/t/TestApp/root/static/images/btn_120x50_powered_shadow.png deleted file mode 100644 index e6876c0..0000000 Binary files a/t/TestApp/root/static/images/btn_120x50_powered_shadow.png and /dev/null differ diff --git a/t/TestApp/root/static/images/btn_88x31_built.png b/t/TestApp/root/static/images/btn_88x31_built.png deleted file mode 100644 index 007b5db..0000000 Binary files a/t/TestApp/root/static/images/btn_88x31_built.png and /dev/null differ diff --git a/t/TestApp/root/static/images/btn_88x31_built_shadow.png b/t/TestApp/root/static/images/btn_88x31_built_shadow.png deleted file mode 100644 index ccf4624..0000000 Binary files a/t/TestApp/root/static/images/btn_88x31_built_shadow.png and /dev/null differ diff --git a/t/TestApp/root/static/images/btn_88x31_powered.png b/t/TestApp/root/static/images/btn_88x31_powered.png deleted file mode 100644 index 8f0cd9f..0000000 Binary files a/t/TestApp/root/static/images/btn_88x31_powered.png and /dev/null differ diff --git a/t/TestApp/root/static/images/btn_88x31_powered_shadow.png b/t/TestApp/root/static/images/btn_88x31_powered_shadow.png deleted file mode 100644 index aa776fa..0000000 Binary files a/t/TestApp/root/static/images/btn_88x31_powered_shadow.png and /dev/null differ diff --git a/t/TestApp/root/static/images/catalyst_logo.png b/t/TestApp/root/static/images/catalyst_logo.png deleted file mode 100644 index 21f1cac..0000000 Binary files a/t/TestApp/root/static/images/catalyst_logo.png and /dev/null differ diff --git a/t/TestApp/script/testapp_cgi.pl b/t/TestApp/script/testapp_cgi.pl deleted file mode 100755 index 181ac12..0000000 --- a/t/TestApp/script/testapp_cgi.pl +++ /dev/null @@ -1,34 +0,0 @@ -#!/usr/bin/env perl - -use FindBin qw/$Bin/; - -## because this is a test -use lib "$Bin/../../../lib"; -use Catalyst::ScriptRunner; -Catalyst::ScriptRunner->run('Catalyst','CGI'); - -1; - -=head1 NAME - -testapp_cgi.pl - Catalyst CGI - -=head1 SYNOPSIS - -See L - -=head1 DESCRIPTION - -Run a Catalyst application as a cgi script. - -=head1 AUTHORS - -Catalyst Contributors, see Catalyst.pm - -=head1 COPYRIGHT - - -This library is free software. You can redistribute it and/or modify -it under the same terms as Perl itself. - -=cut diff --git a/t/TestApp/script/testapp_create.pl b/t/TestApp/script/testapp_create.pl deleted file mode 100755 index 16922aa..0000000 --- a/t/TestApp/script/testapp_create.pl +++ /dev/null @@ -1,59 +0,0 @@ -#!/usr/bin/env perl - -use FindBin qw/$Bin/; - -## because this is a test -use lib "$Bin/../../../lib"; -use Catalyst::ScriptRunner; -Catalyst::ScriptRunner->run('TestApp','Create'); - - -1; - -=head1 NAME - -testapp_create.pl - Create a new Catalyst Component - -=head1 SYNOPSIS - -testapp_create.pl [options] model|view|controller name [helper] [options] - - Options: - -force don't create a .new file where a file to be created exists - -mechanize use Test::WWW::Mechanize::Catalyst for tests if available - -help display this help and exits - - Examples: - testapp_create.pl controller My::Controller - testapp_create.pl -mechanize controller My::Controller - testapp_create.pl view My::View - testapp_create.pl view MyView TT - testapp_create.pl view TT TT - testapp_create.pl model My::Model - testapp_create.pl model SomeDB DBIC::Schema MyApp::Schema create=dynamic\ - dbi:SQLite:/tmp/my.db - testapp_create.pl model AnotherDB DBIC::Schema MyApp::Schema create=static\ - dbi:Pg:dbname=foo root 4321 - - See also: - perldoc Catalyst::Manual - perldoc Catalyst::Manual::Intro - -=head1 DESCRIPTION - -Create a new Catalyst Component. - -Existing component files are not overwritten. If any of the component files -to be created already exist the file will be written with a '.new' suffix. -This behavior can be suppressed with the C<-force> option. - -=head1 AUTHORS - -Catalyst Contributors, see Catalyst.pm - -=head1 COPYRIGHT - -This library is free software. You can redistribute it and/or modify -it under the same terms as Perl itself. - -=cut diff --git a/t/TestApp/script/testapp_fastcgi.pl b/t/TestApp/script/testapp_fastcgi.pl deleted file mode 100755 index 1c9c781..0000000 --- a/t/TestApp/script/testapp_fastcgi.pl +++ /dev/null @@ -1,49 +0,0 @@ -#!/usr/bin/env perl - -use FindBin qw/$Bin/; - -## because this is a test -use lib "$Bin/../../../lib"; -use Catalyst::ScriptRunner; -Catalyst::ScriptRunner->run('Catalyst','FastCGI'); -1; -=head1 NAME - -testapp_fastcgi.pl - Catalyst FastCGI - -=head1 SYNOPSIS - -testapp_fastcgi.pl [options] - - Options: - -? -help display this help and exits - -l -listen Socket path to listen on - (defaults to standard input) - can be HOST:PORT, :PORT or a - filesystem path - -n -nproc specify number of processes to keep - to serve requests (defaults to 1, - requires -listen) - -p -pidfile specify filename for pid file - (requires -listen) - -d -daemon daemonize (requires -listen) - -M -manager specify alternate process manager - (FCGI::ProcManager sub-class) - or empty string to disable - -e -keeperr send error messages to STDOUT, not - to the webserver - -=head1 DESCRIPTION - -Run a Catalyst application as fastcgi. - -=head1 AUTHORS - -Catalyst Contributors, see Catalyst.pm - -=head1 COPYRIGHT - -This library is free software. You can redistribute it and/or modify -it under the same terms as Perl itself. - -=cut diff --git a/t/TestApp/script/testapp_server.pl b/t/TestApp/script/testapp_server.pl deleted file mode 100755 index 864708b..0000000 --- a/t/TestApp/script/testapp_server.pl +++ /dev/null @@ -1,13 +0,0 @@ -#!/usr/bin/env perl - -use FindBin qw/$Bin/; -BEGIN { - $ENV{CATALYST_ENGINE} ||= 'HTTP'; - $ENV{CATALYST_SCRIPT_GEN} = 31; - require Catalyst::Engine::HTTP; -} - -## because this is a test -use lib "$Bin/../../../lib"; -use Catalyst::ScriptRunner -run 'TestApp' 'Server'; - diff --git a/t/TestApp/script/testapp_test.pl b/t/TestApp/script/testapp_test.pl deleted file mode 100755 index 2444a30..0000000 --- a/t/TestApp/script/testapp_test.pl +++ /dev/null @@ -1,43 +0,0 @@ -#!/usr/bin/env perl -use FindBin qw/$Bin/; - -## because this is a test -use lib "$Bin/../../../lib"; -use Catalyst::ScriptRunner; -Catalyst::ScriptRunner->run('Catalyst','Test'); - -1; - -=head1 NAME - -testapp_test.pl - Catalyst Test - -=head1 SYNOPSIS - -testapp_test.pl [options] uri - - Options: - -help display this help and exits - - Examples: - testapp_test.pl http://localhost/some_action - testapp_test.pl /some_action - - See also: - perldoc Catalyst::Manual - perldoc Catalyst::Manual::Intro - -=head1 DESCRIPTION - -Run a Catalyst action from the command line. - -=head1 AUTHORS - -Catalyst Contributors, see Catalyst.pm - -=head1 COPYRIGHT - -This library is free software. You can redistribute it and/or modify -it under the same terms as Perl itself. - -=cut diff --git a/t/TestApp/t/01app.t b/t/TestApp/t/01app.t deleted file mode 100644 index eda556c..0000000 --- a/t/TestApp/t/01app.t +++ /dev/null @@ -1,8 +0,0 @@ -#!/usr/bin/env perl -use strict; -use warnings; -use Test::More tests => 2; - -BEGIN { use_ok 'Catalyst::Test', '' } - -ok( request('/')->is_success, 'Request should succeed' ); diff --git a/t/TestApp/t/02pod.t b/t/TestApp/t/02pod.t deleted file mode 100644 index 3d1bab1..0000000 --- a/t/TestApp/t/02pod.t +++ /dev/null @@ -1,10 +0,0 @@ -#!/usr/bin/env perl -use strict; -use warnings; -use Test::More; - -eval "use Test::Pod 1.14"; -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(); diff --git a/t/TestApp/t/03podcoverage.t b/t/TestApp/t/03podcoverage.t deleted file mode 100644 index 4e1c6e7..0000000 --- a/t/TestApp/t/03podcoverage.t +++ /dev/null @@ -1,10 +0,0 @@ -#!/usr/bin/env perl -use strict; -use warnings; -use Test::More; - -eval "use Test::Pod::Coverage 1.04"; -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(); diff --git a/t/TestApp/testapp.conf b/t/TestApp/testapp.conf deleted file mode 100644 index 11a025c..0000000 --- a/t/TestApp/testapp.conf +++ /dev/null @@ -1,3 +0,0 @@ -# rename this file to TestApp.yml and put a ':' in front of 'name' if -# you want to use YAML like in old versions of Catalyst -name TestApp