Lines 308-314
sub SendAlerts {
Link Here
|
308 |
my $subscription = Koha::Subscriptions->find( $subscriptionid ); |
308 |
my $subscription = Koha::Subscriptions->find( $subscriptionid ); |
309 |
my $subscribers = $subscription->subscribers; |
309 |
my $subscribers = $subscription->subscribers; |
310 |
while ( my $patron = $subscribers->next ) { |
310 |
while ( my $patron = $subscribers->next ) { |
311 |
my $email = $patron->email or next; |
311 |
my $email = $patron->notice_email_address or next; |
312 |
|
312 |
|
313 |
# warn "sending issues..."; |
313 |
# warn "sending issues..."; |
314 |
my $userenv = C4::Context->userenv; |
314 |
my $userenv = C4::Context->userenv; |
315 |
- |
|
|