--- trunk/t/2-input.t 2007/04/11 10:09:34 819 +++ trunk/t/2-input.t 2007/04/11 12:22:31 820 @@ -134,7 +134,7 @@ $WebPAC::Input::Test::size = 42; -ok($input->open( path => "$abs_path/modify_isis/LIBRI", ), "open modify_isis (plain)"); +ok($input->open( path => "/fake/path", ), "open modify_isis (plain)"); cmp_ok($input->size, '==', 42, 'size'); @@ -143,7 +143,7 @@ # modify_records ok($input->open( - path => "$abs_path/modify_isis/LIBRI", + path => "/another/fake/path", modify_records => { 200 => { '*' => { '^c' => '. ' }, @@ -170,7 +170,7 @@ my $modify_file = "$abs_path/conf/modify/test.pl"; ok($input->open( - path => "$abs_path/modify_isis/LIBRI", + path => "/and/another/fake/path", modify_file => $modify_file, ), "open (with modify_file $modify_file)"); @@ -189,3 +189,8 @@ '^a foo^kbar^dbaz : zzz', ); +# empty subfield removal +test_filter(901, + '^a^efoo', + '^efoo', +);