X-Git-Url: http://git.rot13.org/?p=Biblio-Isis;a=blobdiff_plain;f=t%2F001_load.t;h=bb5a63638d8755de602dfef15c7dfaf3c8ec62f6;hp=c2734d685e0df677ecbc46da8328d4fbcf39374b;hb=fa6e3fb112b5e77d6545b78692ecf575c91ed893;hpb=07932c16ad44896d07f77d3e20b9df7dac7bc0ac

diff --git a/t/001_load.t b/t/001_load.t
index c2734d6..bb5a636 100755
--- a/t/001_load.t
+++ b/t/001_load.t
@@ -4,11 +4,14 @@ use strict;
 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');