[Catalyst-commits] r13955 - in CatalystX-Restarter-GTK/trunk: . lib lib/CatalystX lib/CatalystX/Restarter t t/author t/lib t/lib/TestApp t/lib/TestApp/Controller t/lib/script

dd070 at dev.catalyst.perl.org dd070 at dev.catalyst.perl.org
Fri Feb 11 11:27:22 GMT 2011


Author: dd070
Date: 2011-02-11 11:27:22 +0000 (Fri, 11 Feb 2011)
New Revision: 13955

Added:
   CatalystX-Restarter-GTK/trunk/Changes
   CatalystX-Restarter-GTK/trunk/MANIFEST.SKIP
   CatalystX-Restarter-GTK/trunk/Makefile.PL
   CatalystX-Restarter-GTK/trunk/README
   CatalystX-Restarter-GTK/trunk/gitignore
   CatalystX-Restarter-GTK/trunk/lib/
   CatalystX-Restarter-GTK/trunk/lib/CatalystX/
   CatalystX-Restarter-GTK/trunk/lib/CatalystX/Restarter/
   CatalystX-Restarter-GTK/trunk/lib/CatalystX/Restarter/GTK.pm
   CatalystX-Restarter-GTK/trunk/t/
   CatalystX-Restarter-GTK/trunk/t/00-load.t
   CatalystX-Restarter-GTK/trunk/t/author/
   CatalystX-Restarter-GTK/trunk/t/author/pod-coverage.t
   CatalystX-Restarter-GTK/trunk/t/author/pod.t
   CatalystX-Restarter-GTK/trunk/t/lib/
   CatalystX-Restarter-GTK/trunk/t/lib/Makefile.PL
   CatalystX-Restarter-GTK/trunk/t/lib/TestApp.pm
   CatalystX-Restarter-GTK/trunk/t/lib/TestApp/
   CatalystX-Restarter-GTK/trunk/t/lib/TestApp/Controller/
   CatalystX-Restarter-GTK/trunk/t/lib/TestApp/Controller/Root.pm
   CatalystX-Restarter-GTK/trunk/t/lib/script/
   CatalystX-Restarter-GTK/trunk/t/lib/script/testapp_server.pl
   CatalystX-Restarter-GTK/trunk/t/lib/script/testapp_test.pl
   CatalystX-Restarter-GTK/trunk/t/live-test.t
Log:
Initial skeleton

Added: CatalystX-Restarter-GTK/trunk/MANIFEST.SKIP
===================================================================
--- CatalystX-Restarter-GTK/trunk/MANIFEST.SKIP	                        (rev 0)
+++ CatalystX-Restarter-GTK/trunk/MANIFEST.SKIP	2011-02-11 11:27:22 UTC (rev 13955)
@@ -0,0 +1,11 @@
+.git/
+blib
+pm_to_blib
+MANIFEST.bak
+MANIFEST.SKIP~
+cover_db
+Makefile$
+Makefile.old$
+^CatalystX-Restarter-GTK-
+^.gitignore
+

Added: CatalystX-Restarter-GTK/trunk/Makefile.PL
===================================================================
--- CatalystX-Restarter-GTK/trunk/Makefile.PL	                        (rev 0)
+++ CatalystX-Restarter-GTK/trunk/Makefile.PL	2011-02-11 11:27:22 UTC (rev 13955)
@@ -0,0 +1,29 @@
+use strict;
+use warnings;
+use inc::Module::Install 0.91;
+use Module::Install::AuthorRequires;
+use Module::Install::AuthorTests;
+
+name 'CatalystX-Restarter-GTK';
+all_from 'lib/CatalystX/Restarter/GTK.pm';
+
+requires 'Moose';
+requires 'namespace::autoclean';
+
+build_requires 'Catalyst::Runtime' => '5.80015';
+build_requires 'Test::WWW::Mechanize::Catalyst';
+build_requires 'Test::More' => '0.88';
+
+author_requires 'Test::Pod::Coverage' => '1.04';
+author_requires 'Test::Pod' => '1.14';
+
+author_tests 't/author';
+
+resources repository => 'git://somewhere.com/myproject.git';
+
+if ($Module::Install::AUTHOR) {
+    system("pod2text lib/CatalystX/Restarter/GTK.pm > README")
+        and die $!;
+}
+
+WriteAll();

Added: CatalystX-Restarter-GTK/trunk/gitignore
===================================================================
--- CatalystX-Restarter-GTK/trunk/gitignore	                        (rev 0)
+++ CatalystX-Restarter-GTK/trunk/gitignore	2011-02-11 11:27:22 UTC (rev 13955)
@@ -0,0 +1,10 @@
+cover_db
+META.yml
+Makefile
+blib
+inc
+pm_to_blib
+MANIFEST
+Makefile.old
+CatalystX-Restarter-GTK-*
+

Added: CatalystX-Restarter-GTK/trunk/lib/CatalystX/Restarter/GTK.pm
===================================================================
--- CatalystX-Restarter-GTK/trunk/lib/CatalystX/Restarter/GTK.pm	                        (rev 0)
+++ CatalystX-Restarter-GTK/trunk/lib/CatalystX/Restarter/GTK.pm	2011-02-11 11:27:22 UTC (rev 13955)
@@ -0,0 +1,26 @@
+package CatalystX::Restarter::GTK;
+use Moose;
+use namespace::autoclean;
+
+1;
+
+=head1 NAME
+
+CatalystX::Restarter::GTK - 
+
+=head1 DESCRIPTION
+
+=head1 METHODS
+
+=head1 BUGS
+
+=head1 AUTHOR
+
+=head1 COPYRIGHT & LICENSE
+
+Copyright 2009 the above author(s).
+
+This sofware is free software, and is licensed under the same terms as perl itself.
+
+=cut
+

Added: CatalystX-Restarter-GTK/trunk/t/00-load.t
===================================================================
--- CatalystX-Restarter-GTK/trunk/t/00-load.t	                        (rev 0)
+++ CatalystX-Restarter-GTK/trunk/t/00-load.t	2011-02-11 11:27:22 UTC (rev 13955)
@@ -0,0 +1,8 @@
+#!/usr/bin/env perl
+
+use strict;
+use warnings;
+use Test::More;
+use_ok 'CatalystX::Restarter::GTK';
+
+done_testing;

Added: CatalystX-Restarter-GTK/trunk/t/author/pod-coverage.t
===================================================================
--- CatalystX-Restarter-GTK/trunk/t/author/pod-coverage.t	                        (rev 0)
+++ CatalystX-Restarter-GTK/trunk/t/author/pod-coverage.t	2011-02-11 11:27:22 UTC (rev 13955)
@@ -0,0 +1,7 @@
+#!/usr/bin/env perl
+
+use strict;
+use warnings;
+use Test::More;
+use Test::Pod::Coverage 1.04;
+all_pod_coverage_ok();

Added: CatalystX-Restarter-GTK/trunk/t/author/pod.t
===================================================================
--- CatalystX-Restarter-GTK/trunk/t/author/pod.t	                        (rev 0)
+++ CatalystX-Restarter-GTK/trunk/t/author/pod.t	2011-02-11 11:27:22 UTC (rev 13955)
@@ -0,0 +1,7 @@
+#!/usr/bin/env perl
+
+use strict;
+use warnings;
+use Test::More;
+use Test::Pod 1.14;
+all_pod_files_ok();

Added: CatalystX-Restarter-GTK/trunk/t/lib/TestApp/Controller/Root.pm
===================================================================
--- CatalystX-Restarter-GTK/trunk/t/lib/TestApp/Controller/Root.pm	                        (rev 0)
+++ CatalystX-Restarter-GTK/trunk/t/lib/TestApp/Controller/Root.pm	2011-02-11 11:27:22 UTC (rev 13955)
@@ -0,0 +1,17 @@
+package TestApp::Controller::Root;
+use Moose;
+use namespace::autoclean;
+
+BEGIN { extends 'Catalyst::Controller' }
+
+__PACKAGE__->config(namespace => q{});
+
+sub base : Chained('/') PathPart('') CaptureArgs(0) {}
+
+# your actions replace this one
+sub main : Chained('base') PathPart('') Args(0) {
+    my ($self, $ctx) = @_;
+    $ctx->res->body('<h1>It works</h1>');
+}
+
+__PACKAGE__->meta->make_immutable;

Added: CatalystX-Restarter-GTK/trunk/t/lib/TestApp.pm
===================================================================
--- CatalystX-Restarter-GTK/trunk/t/lib/TestApp.pm	                        (rev 0)
+++ CatalystX-Restarter-GTK/trunk/t/lib/TestApp.pm	2011-02-11 11:27:22 UTC (rev 13955)
@@ -0,0 +1,11 @@
+package TestApp;
+use Moose;
+use namespace::autoclean;
+
+use Catalyst;
+
+extends 'Catalyst';
+
+__PACKAGE__->setup;
+
+1;

Added: CatalystX-Restarter-GTK/trunk/t/lib/script/testapp_server.pl
===================================================================
--- CatalystX-Restarter-GTK/trunk/t/lib/script/testapp_server.pl	                        (rev 0)
+++ CatalystX-Restarter-GTK/trunk/t/lib/script/testapp_server.pl	2011-02-11 11:27:22 UTC (rev 13955)
@@ -0,0 +1,10 @@
+#!/usr/bin/env perl
+
+BEGIN {
+    $ENV{CATALYST_SCRIPT_GEN} = 40;
+}
+
+use Catalyst::ScriptRunner;
+Catalyst::ScriptRunner->run('TestApp', 'Server');
+
+1;

Added: CatalystX-Restarter-GTK/trunk/t/lib/script/testapp_test.pl
===================================================================
--- CatalystX-Restarter-GTK/trunk/t/lib/script/testapp_test.pl	                        (rev 0)
+++ CatalystX-Restarter-GTK/trunk/t/lib/script/testapp_test.pl	2011-02-11 11:27:22 UTC (rev 13955)
@@ -0,0 +1,12 @@
+#!/usr/bin/env perl
+
+use strict;
+use warnings;
+
+use FindBin;
+use lib "$FindBin::Bin/..";
+use Catalyst::Test 'TestApp';
+
+print request($ARGV[0])->content . "\n";
+
+1;

Added: CatalystX-Restarter-GTK/trunk/t/live-test.t
===================================================================
--- CatalystX-Restarter-GTK/trunk/t/live-test.t	                        (rev 0)
+++ CatalystX-Restarter-GTK/trunk/t/live-test.t	2011-02-11 11:27:22 UTC (rev 13955)
@@ -0,0 +1,20 @@
+#!/usr/bin/env perl
+
+use strict;
+use warnings;
+use Test::More;
+
+# setup library path
+use FindBin qw($Bin);
+use lib "$Bin/lib";
+
+# make sure testapp works
+use ok 'TestApp';
+
+# a live test against TestApp, the test application
+use Test::WWW::Mechanize::Catalyst 'TestApp';
+my $mech = Test::WWW::Mechanize::Catalyst->new;
+$mech->get_ok('http://localhost/', 'get main page');
+$mech->content_like(qr/it works/i, 'see if it has our text');
+
+done_testing;




More information about the Catalyst-commits mailing list