/[MARC-Fast]/trunk/t/002_marc-utf8.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/002_marc-utf8.t

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

revision 32 by dpavlin, Thu Feb 4 17:10:14 2010 UTC revision 38 by dpavlin, Thu Sep 23 12:29:37 2010 UTC
# Line 16  my $debug = shift @ARGV; Line 16  my $debug = shift @ARGV;
16  my $marc_file = 't/utf8.marc';  my $marc_file = 't/utf8.marc';
17    
18  ok(my $marc = MARC::Fast->new(  ok(my $marc = MARC::Fast->new(
19          marcdb => 't/utf8.marc',          marcdb => $marc_file,
20          hash_filter => sub {          hash_filter => sub {
21                  Encode::decode( 'utf-8', $_[0] );                  Encode::decode( 'utf-8', $_[0] );
22          },          },
Legend:
Removed from v.32  
changed lines
  Added in v.38
  ViewVC Help
Powered by ViewVC 1.1.26