fixed warnings in Mojo::IOLoop::Delay (closes #621)

mojolicious · May 13, 2014 · acee2b3 · acee2b3
1 parent 00e767a
commit acee2b3
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 2 deletions.
diff --git a/Changes b/Changes
@@ -1,10 +1,11 @@
 
-5.0  2014-05-13
+5.0  2014-05-14
   - Code name "Tiger Face", this is a major release.
   - Changed heuristics for number detection in Mojo::JSON to better line up
     with user expectations.
   - Removed deprecated support for "X-Forwarded-HTTPS".
   - Removed generate_port method from Mojo::IOLoop.
+  - Fixed warnings in Mojo::IOLoop::Delay.
 
 4.99  2014-05-12
   - Added support for performing blocking and non-blocking requests at the

diff --git a/lib/Mojo/IOLoop/Delay.pm b/lib/Mojo/IOLoop/Delay.pm
@@ -50,7 +50,7 @@ sub _step {
   my ($self, $id, $offset, $len) = (shift, shift, shift, shift);
 
   $self->{args}[$id]
-    = [defined $len ? splice(@_, $offset, $len) : splice(@_, $offset)];
+    = [@_ ? defined $len ? splice @_, $offset, $len : splice @_, $offset : ()];
   return $self if $self->{fail} || --$self->{pending} || $self->{lock};
   local $self->{lock} = 1;
   my @args = map {@$_} @{delete $self->{args}};