Parent Directory | Revision Log | Patch
revision 12 by dpavlin, Fri Nov 3 20:34:31 2006 UTC | revision 13 by dpavlin, Mon Jun 18 22:51:04 2007 UTC | |
---|---|---|
# | Line 23 throws_ok { $marc = MARC::Fast->new(%par | Line 23 throws_ok { $marc = MARC::Fast->new(%par |
23 | $param{marcdb} = 'data/unimarc.iso'; | $param{marcdb} = 'data/unimarc.iso'; |
24 | ||
25 | SKIP: { | SKIP: { |
26 | skip "no $param{marcdb} test file ", 17 unless (-e $param{marcdb}); | skip "no $param{marcdb} test file ", 37 unless (-e $param{marcdb}); |
27 | ||
28 | ok($marc = MARC::Fast->new(%param), "new"); | ok($marc = MARC::Fast->new(%param), "new"); |
29 |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |