View | Details | Raw Unified | Return to bug 24295
Collapse All | Expand All

(-)a/opac/opac-detail.pl (-9 / +9 lines)
Lines 47-53 use C4::Biblio qw( Link Here
47
    GetMarcUrls
47
    GetMarcUrls
48
);
48
);
49
use C4::Items qw( GetHiddenItemnumbers GetItemsInfo );
49
use C4::Items qw( GetHiddenItemnumbers GetItemsInfo );
50
use C4::Circulation qw( GetTransfers );
51
use C4::Tags qw( get_tags );
50
use C4::Tags qw( get_tags );
52
use C4::XISBN qw( get_xisbns );
51
use C4::XISBN qw( get_xisbns );
53
use C4::External::Amazon qw( get_amazon_tld );
52
use C4::External::Amazon qw( get_amazon_tld );
Lines 71-76 use C4::HTML5Media; Link Here
71
use C4::CourseReserves qw( GetItemCourseReservesInfo );
70
use C4::CourseReserves qw( GetItemCourseReservesInfo );
72
71
73
use Koha::Biblios;
72
use Koha::Biblios;
73
use Koha::DateUtils qw( output_pref );
74
use Koha::RecordProcessor;
74
use Koha::RecordProcessor;
75
use Koha::AuthorisedValues;
75
use Koha::AuthorisedValues;
76
use Koha::CirculationRules;
76
use Koha::CirculationRules;
Lines 732-744 if ( not $viewallitems and @items > $max_items_to_display ) { Link Here
732
     my $reserve_status = C4::Reserves::GetReserveStatus($itm->{itemnumber});
732
     my $reserve_status = C4::Reserves::GetReserveStatus($itm->{itemnumber});
733
      if( $reserve_status eq "Waiting"){ $itm->{'waiting'} = 1; }
733
      if( $reserve_status eq "Waiting"){ $itm->{'waiting'} = 1; }
734
      if( $reserve_status eq "Reserved"){ $itm->{'onhold'} = 1; }
734
      if( $reserve_status eq "Reserved"){ $itm->{'onhold'} = 1; }
735
    
735
736
     my ( $transfertwhen, $transfertfrom, $transfertto ) = GetTransfers($itm->{itemnumber});
736
737
     if ( defined( $transfertwhen ) && $transfertwhen ne '' ) {
737
    my $transfer = $item->get_transfer;
738
        $itm->{transfertwhen} = $transfertwhen;
738
    if ( $transfer && $transfer->in_transit ) {
739
        $itm->{transfertfrom} = $transfertfrom;
739
        $itm->{transfertwhen} = output_pref({ dt => dt_from_string($transfer->datesent) });
740
        $itm->{transfertto}   = $transfertto;
740
        $itm->{transfertfrom} = $transfer->frombranch;
741
     }
741
        $itm->{transfertto} = $transfer->tobranch;
742
    }
742
    
743
    
743
    if ( C4::Context->preference('OPACAcquisitionDetails') ) {
744
    if ( C4::Context->preference('OPACAcquisitionDetails') ) {
744
        $itm->{on_order} = 1
745
        $itm->{on_order} = 1
745
- 

Return to bug 24295