Lines 2797-2802
sub queue_notice {
Link Here
|
2797 |
@message_transports = @{ $params->{message_transports} }; |
2797 |
@message_transports = @{ $params->{message_transports} }; |
2798 |
} |
2798 |
} |
2799 |
return unless defined $letter_code; |
2799 |
return unless defined $letter_code; |
|
|
2800 |
if ( $params->{expiry_notice_mandatory} ) { |
2801 |
push( @message_transports, $params->{primary_contact_method} || 'print' ) if scalar(@message_transports) == 0; |
2802 |
} |
2803 |
|
2800 |
$letter_params->{letter_code} = $letter_code; |
2804 |
$letter_params->{letter_code} = $letter_code; |
2801 |
my $print_sent = 0; |
2805 |
my $print_sent = 0; |
2802 |
my %return; |
2806 |
my %return; |