/[webpac2]/trunk/t/6-unit.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/6-unit.t

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

revision 536 by dpavlin, Mon Jun 26 16:39:51 2006 UTC revision 585 by dpavlin, Wed Jul 5 19:52:45 2006 UTC
# Line 49  ok(my $isis = new WebPAC::Input( Line 49  ok(my $isis = new WebPAC::Input(
49  ok(my $maxmfn = $isis->open(  ok(my $maxmfn = $isis->open(
50          path => $isis_file,          path => $isis_file,
51          code_page => '852',             # database encoding          code_page => '852',             # database encoding
52          lookup => $lookup,          lookup_coderef => sub {
53                    my $rec = shift || return;
54                    $lookup->add( $rec );
55            },
56  ), "Input::ISIS->open");  ), "Input::ISIS->open");
57    
58  ok(my $path = tempdir( CLEANUP => 1 ), "path");  ok(my $path = tempdir( CLEANUP => 1 ), "path");
Legend:
Removed from v.536  
changed lines
  Added in v.585
  ViewVC Help
Powered by ViewVC 1.1.26