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

(-)a/C4/ILSDI/Services.pm (-5 lines)
Lines 204-212 sub GetRecords { Link Here
204
            $biblioitem->{marcxml} = $record->as_xml_record();
204
            $biblioitem->{marcxml} = $record->as_xml_record();
205
        }
205
        }
206
206
207
        # We don't want MARC to be displayed
208
        delete $biblioitem->{'marc'};
209
210
        # Get most of the needed data
207
        # Get most of the needed data
211
        my $biblioitemnumber = $biblioitem->{'biblioitemnumber'};
208
        my $biblioitemnumber = $biblioitem->{'biblioitemnumber'};
212
        my $reserves         = GetReservesFromBiblionumber({ biblionumber => $biblionumber });
209
        my $reserves         = GetReservesFromBiblionumber({ biblionumber => $biblionumber });
Lines 409-415 sub GetPatronInfo { Link Here
409
            my $branchname = GetBranchName( $reserve->{'branchcode'} );
406
            my $branchname = GetBranchName( $reserve->{'branchcode'} );
410
407
411
            # Remove unwanted fields
408
            # Remove unwanted fields
412
            delete $item->{'marc'};
413
            delete $item->{'marcxml'};
409
            delete $item->{'marcxml'};
414
            delete $item->{'more_subfields_xml'};
410
            delete $item->{'more_subfields_xml'};
415
411
416
- 

Return to bug 10455