@@ -, +, @@ - create circulation rules for branch only for example (Midway branch). - No need to set default circulation rules. --- C4/Reserves.pm | 7 ++++--- 1 files changed, 4 insertions(+), 3 deletions(-) --- a/C4/Reserves.pm +++ a/C4/Reserves.pm @@ -391,14 +391,15 @@ sub GetReservesFromBorrowernumber { sub CanBookBeReserved{ my ($borrowernumber, $biblionumber) = @_; - my @items = get_itemnumbers_of($biblionumber); + my $items = &get_itemnumbers_of($biblionumber); #get items linked via host records my @hostitems = get_hostitemnumbers_of($biblionumber); if (@hostitems){ - push (@items,@hostitems); + push (@hostitems,$items); } - foreach my $item (@items){ + my %itemhash = %$items; + foreach my $item (keys %itemhash) { return 1 if CanItemBeReserved($borrowernumber, $item); } return 0; --