--- trunk/t/001_load.t 2005/01/06 20:48:07 36 +++ trunk/t/001_load.t 2005/01/12 19:28:41 38 @@ -4,11 +4,14 @@ use blib; use Test::More tests => 2; +use File::Spec; BEGIN { use_ok( 'Biblio::Isis' ); } +my $path = File::Spec->catfile('data', 'winisis', 'BIBL'); + my $object = Biblio::Isis->new ( - isisdb => './data/winisis/BIBL', + isisdb => $path, ); isa_ok ($object, 'Biblio::Isis');