--- trunk/t/3-normalize-marc.t 2007/11/19 15:56:05 1047 +++ trunk/t/3-normalize-marc.t 2007/11/21 10:09:55 1062 @@ -3,7 +3,7 @@ use strict; use blib; -use Test::More tests => 262; +use Test::More tests => 325; BEGIN { use_ok( 'WebPAC::Test' ); @@ -49,6 +49,8 @@ 'v' => 'v-8-1', },{ 'v' => 'v-9-1', + },{ + 'v' => '0', }], }; @@ -102,6 +104,7 @@ [440, "0", "1", "a", "a-7-1"], [440, "0", "1", "a", "a-8-1 ;", "v", "v-8-1"], [440, "0", "1", "v", "v-9-1"], + [440, 0, 1, "v", 0], ]; is_deeply( test_marc_template($rec), $marc_out , 'is_deeply');