[Catalyst-commits] r8950 - in Catalyst-Runtime/5.80/trunk: . t/aggregate t/lib/TestApp/Controller/Action

[t0m at dev.catalyst.perl.org]

Author: t0m
Date: 2008-12-27 10:47:41 +0000 (Sat, 27 Dec 2008)
New Revision: 8950

Modified:
   Catalyst-Runtime/5.80/trunk/Changes
   Catalyst-Runtime/5.80/trunk/t/aggregate/live_component_controller_action_streaming.t
   Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Action/Streaming.pm
Log:
Change what we stream to make test sync for engines easier

Modified: Catalyst-Runtime/5.80/trunk/Changes
===================================================================
--- Catalyst-Runtime/5.80/trunk/Changes	2008-12-27 10:32:56 UTC (rev 8949)
+++ Catalyst-Runtime/5.80/trunk/Changes	2008-12-27 10:47:41 UTC (rev 8950)
@@ -1,5 +1,7 @@
 # This file documents the revision history for Perl extension Catalyst.
 
+        - Change streaming test to serve itself rather than 01use.t, making test
+          sync for engines easier (t0m)
         - Refactor capturing of $app from Catalyst::Controller into
           Catalyst::Component::Role::CaptureApp for easier reuse in other
           components (Florian Ragwitz)

Modified: Catalyst-Runtime/5.80/trunk/t/aggregate/live_component_controller_action_streaming.t
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/aggregate/live_component_controller_action_streaming.t	2008-12-27 10:32:56 UTC (rev 8949)
+++ Catalyst-Runtime/5.80/trunk/t/aggregate/live_component_controller_action_streaming.t	2008-12-27 10:47:41 UTC (rev 8950)
@@ -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 ) {

Modified: Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Action/Streaming.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Action/Streaming.pm	2008-12-27 10:32:56 UTC (rev 8949)
+++ Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Action/Streaming.pm	2008-12-27 10:47:41 UTC (rev 8950)
@@ -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 );