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

(-)a/C4/Reserves.pm (-3 / +2 lines)
Lines 382-390 sub GetReservesFromBorrowernumber { Link Here
382
sub CanBookBeReserved{
382
sub CanBookBeReserved{
383
    my ($borrowernumber, $biblionumber) = @_;
383
    my ($borrowernumber, $biblionumber) = @_;
384
384
385
    my @items = GetItemsInfo($biblionumber);
385
    my @items = get_itemnumbers_of($biblionumber);
386
    foreach my $item (@items){
386
    foreach my $item (@items){
387
        return 1 if CanItemBeReserved($borrowernumber, $item->{itemnumber});
387
        return 1 if CanItemBeReserved($borrowernumber, $item);
388
    }
388
    }
389
    return 0;
389
    return 0;
390
}
390
}
391
- 

Return to bug 7016