Lines 212-218
if ( $send_notices && $confirm ) {
Link Here
|
212 |
); |
212 |
); |
213 |
|
213 |
|
214 |
my $library = Koha::Libraries->find( $patron->branchcode ); |
214 |
my $library = Koha::Libraries->find( $patron->branchcode ); |
215 |
my $admin_email_address = $library->branchemail || C4::Context->preference('KohaAdminEmailAddress'); |
215 |
my $admin_email_address = $library->from_email_address; |
216 |
|
216 |
|
217 |
C4::Letters::EnqueueLetter( |
217 |
C4::Letters::EnqueueLetter( |
218 |
{ letter => $letter, |
218 |
{ letter => $letter, |
Lines 270-277
String that denote the letter code.
Link Here
|
270 |
sub send_digests { |
270 |
sub send_digests { |
271 |
my $params = shift; |
271 |
my $params = shift; |
272 |
|
272 |
|
273 |
my $admin_email_address = C4::Context->preference('KohaAdminEmailAddress'); |
|
|
274 |
|
275 |
PATRON: while ( my ( $borrowernumber, $digest ) = each %{$params->{digests}} ) { |
273 |
PATRON: while ( my ( $borrowernumber, $digest ) = each %{$params->{digests}} ) { |
276 |
my $borrower_preferences = |
274 |
my $borrower_preferences = |
277 |
C4::Members::Messaging::GetMessagingPreferences( |
275 |
C4::Members::Messaging::GetMessagingPreferences( |
Lines 285-291
sub send_digests {
Link Here
|
285 |
|
283 |
|
286 |
my $patron = Koha::Patrons->find( $borrowernumber ); |
284 |
my $patron = Koha::Patrons->find( $borrowernumber ); |
287 |
my $library = Koha::Libraries->find( $params->{branchcode} ); |
285 |
my $library = Koha::Libraries->find( $params->{branchcode} ); |
288 |
my $from_address = $library->{branchemail} || $admin_email_address; |
286 |
my $from_address = $library->from_email_address; |
289 |
|
287 |
|
290 |
foreach my $transport ( keys %{ $borrower_preferences->{'transports'} } ) { |
288 |
foreach my $transport ( keys %{ $borrower_preferences->{'transports'} } ) { |
291 |
my $letter = C4::Letters::GetPreparedLetter ( |
289 |
my $letter = C4::Letters::GetPreparedLetter ( |