|
Lines 527-536
sub ModSuggestion {
Link Here
|
| 527 |
}; |
527 |
}; |
| 528 |
return 0 if $@; |
528 |
return 0 if $@; |
| 529 |
|
529 |
|
| 530 |
if ( $suggestion->{STATUS} ) { |
530 |
if ( $suggestion->{STATUS} && $suggestion_object->suggestedby ) { |
| 531 |
|
531 |
|
| 532 |
# fetch the entire updated suggestion so that we can populate the letter |
532 |
# fetch the entire updated suggestion so that we can populate the letter |
| 533 |
my $full_suggestion = GetSuggestion( $suggestion->{suggestionid} ); |
533 |
my $full_suggestion = GetSuggestion( $suggestion->{suggestionid} ); |
|
|
534 |
|
| 534 |
my $patron = Koha::Patrons->find( $full_suggestion->{suggestedby} ); |
535 |
my $patron = Koha::Patrons->find( $full_suggestion->{suggestedby} ); |
| 535 |
|
536 |
|
| 536 |
my $transport = (C4::Context->preference("FallbackToSMSIfNoEmail")) && ($patron->smsalertnumber) && (!$patron->email) ? 'sms' : 'email'; |
537 |
my $transport = (C4::Context->preference("FallbackToSMSIfNoEmail")) && ($patron->smsalertnumber) && (!$patron->email) ? 'sms' : 'email'; |
| 537 |
- |
|
|