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 4a1abb0..fea9aeb 100755 (executable)
--- a/t/MojoFacets-Import-CSV.t
+++ b/t/MojoFacets-Import-CSV.t
@@ -10,7 +10,10 @@ use lib 'lib';
 
 use_ok('MojoFacets::Import::CSV');
 
-ok( my $o = MojoFacets::Import::CSV->new( path => 'data/ESB_izvadak-ziro.cp1250.csv' ), 'new' );
+my $csv = $ARGV[0] || (glob 'data/*.csv')[0];
+diag "using $csv";
+
+ok( my $o = MojoFacets::Import::CSV->new( path => $csv ), 'new' );
 
 ok( my $data = $o->data, 'data' );
 diag dump($data);