/[webpac2]/trunk/t/2-input.t
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/t/2-input.t

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 819 by dpavlin, Sun Feb 4 23:10:18 2007 UTC revision 820 by dpavlin, Wed Apr 11 12:22:31 2007 UTC
# Line 134  $WebPAC::Input::Test::rec = { Line 134  $WebPAC::Input::Test::rec = {
134    
135  $WebPAC::Input::Test::size = 42;  $WebPAC::Input::Test::size = 42;
136    
137  ok($input->open( path => "$abs_path/modify_isis/LIBRI", ), "open modify_isis (plain)");  ok($input->open( path => "/fake/path", ), "open modify_isis (plain)");
138    
139  cmp_ok($input->size, '==', 42, 'size');  cmp_ok($input->size, '==', 42, 'size');
140    
# Line 143  ok(my $rec_p = $input->fetch, 'fetch'); Line 143  ok(my $rec_p = $input->fetch, 'fetch');
143  # modify_records  # modify_records
144    
145  ok($input->open(  ok($input->open(
146          path => "$abs_path/modify_isis/LIBRI",          path => "/another/fake/path",
147          modify_records => {          modify_records => {
148                  200 => {                  200 => {
149                          '*' => { '^c' => '. ' },                          '*' => { '^c' => '. ' },
# Line 170  cmp_ok( Line 170  cmp_ok(
170  my $modify_file = "$abs_path/conf/modify/test.pl";  my $modify_file = "$abs_path/conf/modify/test.pl";
171    
172  ok($input->open(  ok($input->open(
173          path => "$abs_path/modify_isis/LIBRI",          path => "/and/another/fake/path",
174          modify_file => $modify_file,          modify_file => $modify_file,
175  ), "open (with modify_file $modify_file)");  ), "open (with modify_file $modify_file)");
176    
# Line 189  test_filter(200, Line 189  test_filter(200,
189          '^a foo^kbar^dbaz : zzz',          '^a foo^kbar^dbaz : zzz',
190  );  );
191    
192    # empty subfield removal
193    test_filter(901,
194            '^a^efoo',
195            '^efoo',
196    );
Legend:
Removed from v.819  
changed lines
  Added in v.820
  ViewVC Help
Powered by ViewVC 1.1.26