small optimizations

mojolicious · Apr 4, 2013 · 251b39c · 251b39c
1 parent 14fafc6
commit 251b39c
Showing 1 changed file with 2 additions and 3 deletions.
diff --git a/lib/Mojo/IOLoop/Delay.pm b/lib/Mojo/IOLoop/Delay.pm
@@ -42,12 +42,11 @@ sub _step {
   return $self->{counter} if --$self->{counter} || $self->{step};
 
   # Next step
-  my $cb = shift @{$self->{steps} ||= []};
   $self->{$_} = [] for qw(ordered unordered);
   my @args = ((map {@$_} grep {defined} @$ordered), @$unordered);
   local $self->{step} = 1;
-  $self->$cb(@args) if $cb;
-  $self->emit('finish', @args) unless $self->{counter};
+  if (my $cb = shift @{$self->{steps} ||= []}) { $self->$cb(@args) }
+  $self->emit(finish => @args) unless $self->{counter};
 
   return 0;
 }