projects
/
Biblio-Isis
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
use File::Spec in attempt to support MacPerl
[Biblio-Isis]
/
t
/
001_load.t
diff --git
a/t/001_load.t
b/t/001_load.t
index
c2734d6
..
bb5a636
100755
(executable)
--- a/
t/001_load.t
+++ b/
t/001_load.t
@@
-4,11
+4,14
@@
use strict;
use blib;
use Test::More tests => 2;
use blib;
use Test::More tests => 2;
+use File::Spec;
BEGIN { use_ok( 'Biblio::Isis' ); }
BEGIN { use_ok( 'Biblio::Isis' ); }
+my $path = File::Spec->catfile('data', 'winisis', 'BIBL');
+
my $object = Biblio::Isis->new (
my $object = Biblio::Isis->new (
- isisdb =>
'./data/winisis/BIBL'
,
+ isisdb =>
$path
,
);
isa_ok ($object, 'Biblio::Isis');
);
isa_ok ($object, 'Biblio::Isis');