Parent Directory | Revision Log | Patch
revision 2 by dpavlin, Tue Jan 4 15:32:54 2005 UTC | revision 6 by dpavlin, Sun Dec 18 23:12:26 2005 UTC | |
---|---|---|
# | Line 21 throws_ok { $marc = MARC::Fast->new(%par | Line 21 throws_ok { $marc = MARC::Fast->new(%par |
21 | $param{marcdb} = 'data/unimarc.iso'; | $param{marcdb} = 'data/unimarc.iso'; |
22 | ||
23 | SKIP: { | SKIP: { |
24 | skip "no ",$param{marcdb}," test file ", 18 unless (-e $param{marcdb}); | skip "no $param{marcdb} test file ", 17 unless (-e $param{marcdb}); |
25 | ||
26 | ok($marc = MARC::Fast->new(%param), "new"); | ok($marc = MARC::Fast->new(%param), "new"); |
27 |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |