Bug 31313: (QA follow-up) Remove unused bundle_host field from item_info

[koha-ffzg.git] / opac / opac-detail.pl

diff --git a/opac/opac-detail.pl b/opac/opac-detail.pl
index 09e85e2..a7289f3 100755 (executable)
--- a/opac/opac-detail.pl
+++ b/opac/opac-detail.pl
@@ -45,7 +45,6 @@ use C4::Biblio qw(
     GetMarcSubjects
     GetMarcUrls
 );
-use C4::Circulation qw( GetTransfers );
 use C4::Tags qw( get_tags );
 use C4::XISBN qw( get_xisbns );
 use C4::External::Amazon qw( get_amazon_tld );
@@ -501,7 +500,8 @@ $items = Koha::Items->search_ordered(
                 $biblio->host_items->get_column('itemnumber')
             ]
         }
-    ]
+    ],
+    { prefetch => [ 'issue', 'homebranch', 'holdingbranch' ] }
 )->filter_by_visible_in_opac({ patron => $patron }) unless $specific_item;
 
 my $dat = &GetBiblioData($biblionumber);
@@ -681,8 +681,8 @@ if ( not $viewallitems and $items->count > $max_items_to_display ) {
 else {
     while ( my $item = $items->next ) {
         my $item_info = $item->unblessed;
-        $item->{holds_count} = $item_reserves{ $item->itemnumber };
-        $item->{priority}    = $priority{ $item->itemnumber };
+        $item_info->{holds_count} = $item_reserves{ $item->itemnumber };
+        $item_info->{priority}    = $priority{ $item->itemnumber };
 
         $allow_onshelf_holds = Koha::CirculationRules->get_onshelfholds_policy(
             { item => $item, patron => $patron } )
@@ -728,19 +728,6 @@ else {
         $item_info->{checkout} = $item->checkout;
         $item_info->{object} = $item;
 
-        my $reserve_status =
-          C4::Reserves::GetReserveStatus( $item->itemnumber );
-        if ( $reserve_status eq "Waiting"  ) { $item_info->{'waiting'} = 1; }
-        if ( $reserve_status eq "Reserved" ) { $item_info->{'onhold'}  = 1; }
-
-        my ( $transfertwhen, $transfertfrom, $transfertto ) =
-          GetTransfers( $item->itemnumber );
-        if ( defined($transfertwhen) && $transfertwhen ne '' ) {
-            $item_info->{transfertwhen} = $transfertwhen;
-            $item_info->{transfertfrom} = $transfertfrom;
-            $item_info->{transfertto}   = $transfertto;
-        }
-
         if ( C4::Context->preference('OPACAcquisitionDetails') ) {
             $item_info->{on_order} = 1
               if grep { $_ eq $item->itemnumber } @itemnumbers_on_order;
@@ -751,10 +738,6 @@ else {
         }
 
 
-        if ( $item->in_bundle ) {
-            $item_info->{bundle_host} = $item->bundle_host;
-        }
-
         if ( C4::Context->preference('UseCourseReserves') ) {
             $item_info->{course_reserves} = GetItemCourseReservesInfo( itemnumber => $item->itemnumber );
         }