Skip to content
Browse files

Fixed live tests

  • Loading branch information...
1 parent 309216f commit 31817b446cd13dcbc2109ba68777b8766db5e0e2 @vti committed Mar 29, 2011
Showing with 29 additions and 17 deletions.
  1. +4 −0 Changes
  2. +1 −1 lib/Plack/Middleware/SocketIO.pm
  3. +6 −4 t/live/jsonp-polling.t
  4. +6 −4 t/live/websocket.t
  5. +6 −4 t/live/xhr-multipart.t
  6. +6 −4 t/live/xhr-polling.t
View
4 Changes
@@ -1,5 +1,9 @@
Revision history for perl module Plack::Middleware::SocketIO
+0.009002 2011-03-29
+
+ - Fixed live tests
+
0.009001 2011-03-28
- Fixed dependencies list
View
2 lib/Plack/Middleware/SocketIO.pm
@@ -5,7 +5,7 @@ use warnings;
use base 'Plack::Middleware';
-our $VERSION = '0.00901';
+our $VERSION = '0.00902';
use Plack::Util::Accessor qw(resource handler);
View
10 t/live/jsonp-polling.t
@@ -3,12 +3,14 @@ use warnings;
use lib 't/lib';
-BEGIN { $ENV{TEST_TRANSPORT} = 'jsonp-polling' }
-
use Test::More;
-plan skip_all => 'set TEST_LIVE to run this test' unless $ENV{TEST_LIVE};
-plan tests => 2;
+BEGIN {
+ plan skip_all => 'set TEST_LIVE to run this test' unless $ENV{TEST_LIVE};
+ plan tests => 2;
+
+ $ENV{TEST_TRANSPORT} = 'jsonp-polling';
+}
use AnyEvent::Impl::Perl;
use AnyEvent::HTTP;
View
10 t/live/websocket.t
@@ -3,12 +3,14 @@ use warnings;
use lib 't/lib';
-BEGIN { $ENV{TEST_TRANSPORT} = 'websocket' }
-
use Test::More;
-plan skip_all => 'set TEST_LIVE to run this test' unless $ENV{TEST_LIVE};
-plan tests => 1;
+BEGIN {
+ plan skip_all => 'set TEST_LIVE to run this test' unless $ENV{TEST_LIVE};
+ plan tests => 1;
+
+ $ENV{TEST_TRANSPORT} = 'websocket';
+}
use Protocol::WebSocket::Handshake::Client;
use Protocol::WebSocket::Frame;
View
10 t/live/xhr-multipart.t
@@ -3,12 +3,14 @@ use warnings;
use lib 't/lib';
-BEGIN { $ENV{TEST_TRANSPORT} = 'xhr-multipart' }
-
use Test::More;
-plan skip_all => 'set TEST_LIVE to run this test' unless $ENV{TEST_LIVE};
-plan tests => 3;
+BEGIN {
+ plan skip_all => 'set TEST_LIVE to run this test' unless $ENV{TEST_LIVE};
+ plan tests => 3;
+
+ $ENV{TEST_TRANSPORT} = 'xhr-multipart'
+}
use AnyEvent::Impl::Perl;
use AnyEvent::HTTP;
View
10 t/live/xhr-polling.t
@@ -3,12 +3,14 @@ use warnings;
use lib 't/lib';
-BEGIN { $ENV{TEST_TRANSPORT} = 'xhr-polling' }
-
use Test::More;
-plan skip_all => 'set TEST_LIVE to run this test' unless $ENV{TEST_LIVE};
-plan tests => 2;
+BEGIN {
+ plan skip_all => 'set TEST_LIVE to run this test' unless $ENV{TEST_LIVE};
+ plan tests => 2;
+
+ $ENV{TEST_TRANSPORT} = 'xhr-polling';
+}
use AnyEvent::Impl::Perl;
use AnyEvent::HTTP;

0 comments on commit 31817b4

Please sign in to comment.
Something went wrong with that request. Please try again.