[Catalyst-commits] r9072 - in trunk/Catalyst-Engine-HTTP-Prefork/t: . lib/TestApp/Controller/Action

[t0m at dev.catalyst.perl.org]

Author: t0m
Date: 2009-01-12 04:58:34 +0000 (Mon, 12 Jan 2009)
New Revision: 9072

Modified:
   trunk/Catalyst-Engine-HTTP-Prefork/t/lib/TestApp/Controller/Action/Streaming.pm
   trunk/Catalyst-Engine-HTTP-Prefork/t/live_component_controller_action_path.t
   trunk/Catalyst-Engine-HTTP-Prefork/t/live_component_controller_action_streaming.t
Log:
Test updates

Modified: trunk/Catalyst-Engine-HTTP-Prefork/t/lib/TestApp/Controller/Action/Streaming.pm
===================================================================
--- trunk/Catalyst-Engine-HTTP-Prefork/t/lib/TestApp/Controller/Action/Streaming.pm	2009-01-12 04:46:50 UTC (rev 9071)
+++ trunk/Catalyst-Engine-HTTP-Prefork/t/lib/TestApp/Controller/Action/Streaming.pm	2009-01-12 04:58:34 UTC (rev 9072)
@@ -17,7 +17,7 @@
 sub body : Local {
     my ( $self, $c ) = @_;
     
-    my $file = "$FindBin::Bin/01use.t";
+    my $file = "$FindBin::Bin/lib/TestApp/Controller/Action/Streaming.pm";
     my $fh = IO::File->new( $file, 'r' );
     if ( defined $fh ) {
         $c->res->body( $fh );

Modified: trunk/Catalyst-Engine-HTTP-Prefork/t/live_component_controller_action_path.t
===================================================================
--- trunk/Catalyst-Engine-HTTP-Prefork/t/live_component_controller_action_path.t	2009-01-12 04:46:50 UTC (rev 9071)
+++ trunk/Catalyst-Engine-HTTP-Prefork/t/live_component_controller_action_path.t	2009-01-12 04:58:34 UTC (rev 9072)
@@ -4,7 +4,7 @@
 use warnings;
 
 use FindBin;
-use lib "$FindBin::Bin/../lib";
+use lib "$FindBin::Bin/lib";
 
 our $iters;
 

Modified: trunk/Catalyst-Engine-HTTP-Prefork/t/live_component_controller_action_streaming.t
===================================================================
--- trunk/Catalyst-Engine-HTTP-Prefork/t/live_component_controller_action_streaming.t	2009-01-12 04:46:50 UTC (rev 9071)
+++ trunk/Catalyst-Engine-HTTP-Prefork/t/live_component_controller_action_streaming.t	2009-01-12 04:58:34 UTC (rev 9072)
@@ -54,7 +54,7 @@
             skip "Using remote server", 5;
         }
 
-        my $file = "$FindBin::Bin/01use.t";
+        my $file = "$FindBin::Bin/lib/TestApp/Controller/Action/Streaming.pm";
         my $fh = IO::File->new( $file, 'r' );
         my $buffer;
         if ( defined $fh ) {