Lines 455-460
foreach my $branchcode (@branches) {
Link Here
|
455 |
my $library = Koha::Libraries->find($branchcode); |
455 |
my $library = Koha::Libraries->find($branchcode); |
456 |
my $admin_email_address = $library->branchemail |
456 |
my $admin_email_address = $library->branchemail |
457 |
|| C4::Context->preference('KohaAdminEmailAddress'); |
457 |
|| C4::Context->preference('KohaAdminEmailAddress'); |
|
|
458 |
my $branch_email_address = $library->inbound_email_address; |
458 |
my @output_chunks; # may be sent to mail or stdout or csv file. |
459 |
my @output_chunks; # may be sent to mail or stdout or csv file. |
459 |
|
460 |
|
460 |
$verbose and warn sprintf "branchcode : '%s' using %s\n", $branchcode, $admin_email_address; |
461 |
$verbose and warn sprintf "branchcode : '%s' using %s\n", $branchcode, $admin_email_address; |
Lines 821-827
END_SQL
Link Here
|
821 |
borrowernumber => undef, |
822 |
borrowernumber => undef, |
822 |
message_transport_type => 'email', |
823 |
message_transport_type => 'email', |
823 |
attachments => [$attachment], |
824 |
attachments => [$attachment], |
824 |
to_address => $admin_email_address, |
825 |
to_address => $branch_email_address, |
825 |
} |
826 |
} |
826 |
) unless $test_mode; |
827 |
) unless $test_mode; |
827 |
} |
828 |
} |
828 |
- |
|
|