/[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 624 by dpavlin, Wed Jul 5 19:52:45 2006 UTC revision 625 by dpavlin, Sat Aug 26 12:00:36 2006 UTC
# Line 48  ok(my $isis = new WebPAC::Input( Line 48  ok(my $isis = new WebPAC::Input(
48    
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 => 'cp852',           # database encoding
52          lookup_coderef => sub {          lookup_coderef => sub {
53                  my $rec = shift || return;                  my $rec = shift || return;
54                  $lookup->add( $rec );                  $lookup->add( $rec );
Legend:
Removed from v.624  
changed lines
  Added in v.625
  ViewVC Help
Powered by ViewVC 1.1.26