| Lines 36-41
          use URI::Escape;
      
      
        Link Here | 
        
          | 36 | use Business::ISBN; | 36 | use Business::ISBN; | 
        
          | 37 | use MARC::Record; | 37 | use MARC::Record; | 
        
          | 38 | use MARC::Field; | 38 | use MARC::Field; | 
            
              |  |  | 39 | use Encode qw/decode_utf8/; | 
        
          | 39 | use utf8; | 40 | use utf8; | 
        
          | 40 | use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS $DEBUG); | 41 | use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS $DEBUG); | 
        
          | 41 |  | 42 |  | 
  
    | Lines 503-510
          sub getRecords {
      
      
        Link Here | 
        
          | 503 |                       $size > $facets_maxrecs ? $facets_maxrecs : $size; | 504 |                       $size > $facets_maxrecs ? $facets_maxrecs : $size; | 
        
          | 504 |                     for my $facet (@$facets) { | 505 |                     for my $facet (@$facets) { | 
        
          | 505 |                         for ( my $j = 0 ; $j < $jmax ; $j++ ) { | 506 |                         for ( my $j = 0 ; $j < $jmax ; $j++ ) { | 
          
            
              | 506 |                             my $render_record = | 507 |                             my $render_record = decode_utf8( | 
            
              | 507 |                               $results[ $i - 1 ]->record($j)->render(); | 508 |                               $results[ $i - 1 ]->record($j)->render()); | 
        
          | 508 |                             my @used_datas = (); | 509 |                             my @used_datas = (); | 
        
          | 509 |                             foreach my $tag ( @{ $facet->{tags} } ) { | 510 |                             foreach my $tag ( @{ $facet->{tags} } ) { | 
        
          | 510 |  | 511 |  | 
            
              | 511 | -  |  |  |