| Lines 130-136
          sub new {
      
      
        Link Here | 
        
          | 130 |  | 130 |  | 
        
          | 131 |     # FIXME: populate fine_items recall_items | 131 |     # FIXME: populate fine_items recall_items | 
        
          | 132 |     $ilspatron{unavail_holds} = _get_outstanding_holds($kp->{borrowernumber}); | 132 |     $ilspatron{unavail_holds} = _get_outstanding_holds($kp->{borrowernumber}); | 
          
            
              | 133 |     $ilspatron{items} = $patron->pending_checkouts->unblessed; | 133 |     my $pending_checkouts = $patron->pending_checkouts; | 
            
              |  |  | 134 |     my @items_infos; | 
            
              | 135 |     while ( my $c = $pending_checkouts->next ) { | 
            
              | 136 |         push @items_infos, $c->unblessed_all_relateds; | 
            
              | 137 |     } | 
            
              | 138 |     $ilspatron{items} = \@items_infos; | 
            
              | 139 |  | 
        
          | 134 |     $self = \%ilspatron; | 140 |     $self = \%ilspatron; | 
        
          | 135 |     $debug and warn Dumper($self); | 141 |     $debug and warn Dumper($self); | 
        
          | 136 |     syslog("LOG_DEBUG", "new ILS::Patron(%s): found patron '%s'", $patron_id,$self->{id}); | 142 |     syslog("LOG_DEBUG", "new ILS::Patron(%s): found patron '%s'", $patron_id,$self->{id}); | 
            
              | 137 | -  |  |  |