X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=C4%2FReserves.pm;h=87e23251a02248fc5f66f8a1e0c9ca9ada6e24a1;hb=38b51b56380b44fbc69656164725998db25e88a9;hp=e15d32f5a0ff3f83d6f998faf3d0e395aa7aaa9f;hpb=8fe46f3dc1a3250b04a0da2f6dd9335710b4e702;p=koha.git diff --git a/C4/Reserves.pm b/C4/Reserves.pm index e15d32f5a0..87e23251a0 100644 --- a/C4/Reserves.pm +++ b/C4/Reserves.pm @@ -2,7 +2,7 @@ package C4::Reserves; # Copyright 2000-2002 Katipo Communications # 2006 SAN Ouest Provence -# 2007 BibLibre Paul POULAIN +# 2007-2010 BibLibre Paul POULAIN # # This file is part of Koha. # @@ -194,7 +194,9 @@ sub AddReserve { my $borrower = C4::Members::GetMember(borrowernumber => $borrowernumber); my $biblio = GetBiblioData($biblionumber); my $letter = C4::Letters::getletter( 'reserves', 'HOLDPLACED'); - my $admin_email_address = C4::Context->preference('KohaAdminEmailAddress'); + my $branchcode = $borrower->{branchcode}; + my $branch_details = C4::Branch::GetBranchDetail($branchcode); + my $admin_email_address =$branch_details->{'branchemail'} || C4::Context->preference('KohaAdminEmailAddress'); my %keys = (%$borrower, %$biblio); foreach my $key (keys %keys) { @@ -802,6 +804,12 @@ sub CheckReserves { } else { # See if this item is more important than what we've got so far if ( $res->{'priority'} && $res->{'priority'} < $priority ) { + my $borrowerinfo=C4::Members::GetMemberDetails($res->{'borrowernumber'}); + my $iteminfo=C4::Items::GetItem($itemnumber); + my $branch=C4::Circulation::_GetCircControlBranch($iteminfo,$borrowerinfo); + my $branchitemrule = C4::Circulation::GetBranchItemRule($branch,$iteminfo->{'itype'}); + next if ($branchitemrule->{'holdallowed'} == 0); + next if (($branchitemrule->{'holdallowed'} == 1) && ($branch ne $borrowerinfo->{'branchcode'})); $priority = $res->{'priority'}; $highest = $res; }