run with arbitrary CSV file

[MojoFacets.git] / t / MojoFacets-Import-CSV.t

diff --git a/t/MojoFacets-Import-CSV.t b/t/MojoFacets-Import-CSV.t
index 8c562e1..fea9aeb 100755 (executable)
--- a/t/MojoFacets-Import-CSV.t
+++ b/t/MojoFacets-Import-CSV.t
@@ -10,7 +10,7 @@ use lib 'lib';
 
 use_ok('MojoFacets::Import::CSV');
 
-my $csv = (glob 'data/*.csv')[0];
+my $csv = $ARGV[0] || (glob 'data/*.csv')[0];
 diag "using $csv";
 
 ok( my $o = MojoFacets::Import::CSV->new( path => $csv ), 'new' );