added to_hash, small fix to test, better output in dump_fastmarc.pl [0.02]

[MARC-Fast] / t / 001_marc.t

diff --git a/t/001_marc.t b/t/001_marc.t
index 60254b5..691a3a2 100755 (executable)
--- a/t/001_marc.t
+++ b/t/001_marc.t
@@ -21,7 +21,7 @@ throws_ok { $marc = MARC::Fast->new(%param); } qr/foo.bar/, "marcdb exist";
 $param{marcdb} = 'data/unimarc.iso';
 
 SKIP: {
-       skip "no ",$param{marcdb}," test file ", 18 unless (-e $param{marcdb});
+       skip "no $param{marcdb} test file ", 17 unless (-e $param{marcdb});
 
        ok($marc = MARC::Fast->new(%param), "new");