| Lines 19-25
          package Koha::Z3950Responder::Session;
      
      
        Link Here | 
        
          | 19 |  | 19 |  | 
        
          | 20 | use Modern::Perl; | 20 | use Modern::Perl; | 
        
          | 21 |  | 21 |  | 
            
              | 22 | use C4::Circulation qw( GetTransfers ); |  |  | 
        
          | 23 | use C4::Context; | 22 | use C4::Context; | 
        
          | 24 | use C4::Reserves qw( GetReserveStatus ); | 23 | use C4::Reserves qw( GetReserveStatus ); | 
        
          | 25 | use C4::Search qw(); | 24 | use C4::Search qw(); | 
  
    | Lines 286-293
          sub add_item_status {
      
      
        Link Here | 
        
          | 286 |         push @statuses, $status_strings->{WITHDRAWN}; | 285 |         push @statuses, $status_strings->{WITHDRAWN}; | 
        
          | 287 |     } | 286 |     } | 
        
          | 288 |  | 287 |  | 
          
            
              | 289 |     if ( scalar( GetTransfers( $itemnumber ) ) ) { | 288 |     if ( my $transfer = $item->get_transfer ) { | 
            
              | 290 |         push @statuses, $status_strings->{IN_TRANSIT}; | 289 |         push @statuses, $status_strings->{IN_TRANSIT} if $transfer->in_transit; | 
        
          | 291 |     } | 290 |     } | 
        
          | 292 |  | 291 |  | 
        
          | 293 |     if ( GetReserveStatus( $itemnumber ) ne '' ) { | 292 |     if ( GetReserveStatus( $itemnumber ) ne '' ) { | 
            
              | 294 | -  |  |  |