no more leaks in tests

mojolicious · Feb 15, 2015 · fa66e86 · fa66e86
1 parent a326162
commit fa66e86
Show file tree

Hide file tree

Showing 3 changed files with 8 additions and 8 deletions.
diff --git a/t/mojo/websocket.t b/t/mojo/websocket.t
@@ -140,7 +140,7 @@ $ua->websocket(
   '/' => sub {
     my ($ua, $tx) = @_;
     $tx->on(finish => sub { Mojo::IOLoop->stop });
-    $tx->on(message => sub { $result = pop; $tx->finish });
+    $tx->on(message => sub { shift->finish; $result = shift });
     $tx->send('test1');
   }
 );
@@ -341,7 +341,7 @@ $ua->websocket(
   '/squish' => sub {
     my ($ua, $tx) = @_;
     $tx->on(finish => sub { Mojo::IOLoop->stop });
-    $tx->on(message => sub { $result = pop; $tx->finish });
+    $tx->on(message => sub { shift->finish; $result = shift });
     $tx->send(b(' foo bar '));
   }
 );
@@ -400,7 +400,7 @@ $ua->websocket(
   '/echo' => sub {
     my ($ua, $tx) = @_;
     $tx->on(finish => sub { Mojo::IOLoop->stop });
-    $tx->on(message => sub { $result = pop; $tx->finish });
+    $tx->on(message => sub { shift->finish; $result = shift });
     $tx->send('hi!' x 100);
   }
 );

diff --git a/t/mojo/websocket_proxy.t b/t/mojo/websocket_proxy.t
@@ -130,7 +130,7 @@ $ua->websocket(
   "ws://127.0.0.1:$port/test" => sub {
     my ($ua, $tx) = @_;
     $tx->on(finish => sub { Mojo::IOLoop->stop });
-    $tx->on(message => sub { $result = pop; $tx->finish });
+    $tx->on(message => sub { shift->finish; $result = shift });
     $tx->send('test1');
   }
 );
@@ -160,7 +160,7 @@ $ua->websocket(
     my ($ua, $tx) = @_;
     $kept_alive = $tx->kept_alive;
     $tx->on(finish => sub { Mojo::IOLoop->stop });
-    $tx->on(message => sub { $result = pop; $tx->finish });
+    $tx->on(message => sub { shift->finish; $result = shift });
     $tx->send('test1');
   }
 );
@@ -181,7 +181,7 @@ $ua->websocket(
   "ws://127.0.0.1:$port/test" => sub {
     my ($ua, $tx) = @_;
     $tx->on(finish => sub { Mojo::IOLoop->stop });
-    $tx->on(message => sub { $result = pop; $tx->finish });
+    $tx->on(message => sub { shift->finish; $result = shift });
     $tx->send('test1');
   }
 );

diff --git a/t/mojo/websocket_proxy_tls.t b/t/mojo/websocket_proxy_tls.t
@@ -190,7 +190,7 @@ $ua->websocket(
   "wss://127.0.0.1:$port/test" => sub {
     my ($ua, $tx) = @_;
     $tx->on(finish => sub { Mojo::IOLoop->stop });
-    $tx->on(message => sub { $result = pop; $tx->finish });
+    $tx->on(message => sub { shift->finish; $result = shift });
     $tx->send('test1');
   }
 );
@@ -237,7 +237,7 @@ $ua->websocket(
     my ($ua, $tx) = @_;
     $kept_alive = $tx->kept_alive;
     $tx->on(finish => sub { Mojo::IOLoop->stop });
-    $tx->on(message => sub { $result = pop; $tx->finish });
+    $tx->on(message => sub { shift->finish; $result = shift });
     $tx->send('test1');
   }
 );