Fix warnings in new Catalyst

[catagits/Catalyst-Plugin-Static-Simple.git] / t / lib / TestApp.pm

diff --git a/t/lib/TestApp.pm b/t/lib/TestApp.pm
index 001fb01..cdd73f5 100644 (file)
--- a/t/lib/TestApp.pm
+++ b/t/lib/TestApp.pm
@@ -2,7 +2,6 @@ package TestApp;
 \r
 use strict;\r
 use Catalyst;\r
-use File::Spec::Functions;\r
 use FindBin;\r
 \r
 our $VERSION = '0.01';\r
@@ -29,38 +28,4 @@ sub incpath_generator {
     return [ $c->config->{root} . '/incpath' ];\r
 }\r
 \r
-sub default : Private {\r
-    my ( $self, $c ) = @_;\r
-    \r
-    $c->res->output( 'default' );\r
-}\r
-\r
-sub subtest : Local {\r
-    my ( $self, $c ) = @_;\r
-\r
-    $c->res->output( $c->subreq('/subtest2') );\r
-}\r
-\r
-sub subtest2 : Local {\r
-    my ( $self, $c ) = @_;\r
-    \r
-    $c->res->output( 'subtest2 ok' );\r
-}\r
-\r
-sub serve_static : Local {\r
-    my ( $self, $c ) = @_;\r
-    \r
-    my $file = catfile( $FindBin::Bin, 'lib', 'TestApp.pm' );\r
-    \r
-    $c->serve_static_file( $file );\r
-}\r
-\r
-sub serve_static_404 : Local {\r
-    my ( $self, $c ) = @_;\r
-    \r
-    my $file = catfile( $FindBin::Bin, 'lib', 'foo.pm' );\r
-    \r
-    $c->serve_static_file( $file );\r
-}\r
-\r
 1;\r