/[webpac2]/trunk/lib/WebPAC/Output/KinoSearch.pm
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/lib/WebPAC/Output/KinoSearch.pm

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

revision 948 by dpavlin, Wed Oct 31 12:29:57 2007 UTC revision 949 by dpavlin, Thu Nov 1 00:16:48 2007 UTC
# Line 16  __PACKAGE__->mk_accessors(qw( Line 16  __PACKAGE__->mk_accessors(qw(
16    
17  use KinoSearch::Simple;  use KinoSearch::Simple;
18  use File::Path;  use File::Path;
19  use Encode qw/from_to/;  use Encode qw/decode/;
20  use Data::Dump qw/dump/;  use Data::Dump qw/dump/;
21  use Storable;  use Storable;
22    
# Line 148  sub add { Line 148  sub add {
148                  if ( ref($hash->{$f}) eq 'ARRAY' ) {                  if ( ref($hash->{$f}) eq 'ARRAY' ) {
149                          $hash->{$f} = join(' <*> ', @{ $hash->{$f} });                          $hash->{$f} = join(' <*> ', @{ $hash->{$f} });
150                  }                  }
151    #               $hash->{$f} = decode( $self->encoding, $hash->{$f} );
152          }          }
153    
154          $log->debug("add( $id, ", sub { dump($ds) }," ) => ", sub { dump( $hash ) });          $log->debug("add( $id, ", sub { dump($ds) }," ) => ", sub { dump( $hash ) });
Legend:
Removed from v.948  
changed lines
  Added in v.949
  ViewVC Help
Powered by ViewVC 1.1.26