X-Git-Url: http://git.shiar.net/perl/list-index.git/blobdiff_plain/e288145c227aef0ecfed7c26e135ca2bbd77c040..b9c565b77b8ac8f8856c6af118a1e1af5b917c24:/t/25-apply.t

diff --git a/t/25-apply.t b/t/25-apply.t
index 92467c3..c06ae06 100644
--- a/t/25-apply.t
+++ b/t/25-apply.t
@@ -26,10 +26,7 @@ BEGIN { use_ok('List::Index' => 'rangematch'); }
 	@values = uniq @values;
 
 	# find ranges for generated values
-	my $ranges = eval {
-		my $index = List::Index->new(\@values);
-		$index->ranges(\%options);
-	};
+	my $ranges = eval { List::Index->new(\%options)->ranges(\@values) };
 	my $failure = $@ || ref $ranges ne 'ARRAY' && (
 		$ranges ? 'returned ranges not an array ref' : 'no ranges returned'
 	);