| 
      
            Lines 379-385
          sub build_csv {
      
      
        Link Here
      
     | 
  
        
          | 379 | 
              $csv->combine(@keys);  | 
          379 | 
              $csv->combine(@keys);  | 
        
        
          | 380 | 
              push @lines, $csv->string();  | 
          380 | 
              push @lines, $csv->string();  | 
        
        
          | 381 | 
           | 
          381 | 
           | 
        
          
            
              | 382 | 
                  my @private_keys = qw( title firstname surname phone email address address2 zipcode city country streetnumber streettype );  | 
              382 | 
                  my @private_keys = qw( borrowertitle firstname surname phone email address address2 zipcode city country streetnumber streettype );  | 
            
        
          | 383 | 
              # ... and rest of report  | 
          383 | 
              # ... and rest of report  | 
        
        
          | 384 | 
              foreach my $overdue ( @{ $overdues } ) { | 
          384 | 
              foreach my $overdue ( @{ $overdues } ) { | 
        
        
          | 385 | 
                  unless ( $logged_in_user->can_see_patron_infos( $overdue->{patron} ) ) { | 
          385 | 
                  unless ( $logged_in_user->can_see_patron_infos( $overdue->{patron} ) ) { | 
        
            
              | 386 | 
              -   | 
               | 
               |