Merge remote branch 'kc/new/bug_4438' into kcmaster

[koha_gimpoz] / C4 / Reserves.pm

diff --git a/C4/Reserves.pm b/C4/Reserves.pm
index e15d32f..2dd2688 100644 (file)
--- a/C4/Reserves.pm
+++ b/C4/Reserves.pm
@@ -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) {