Lines 2831-2836
sub queue_notice {
Link Here
|
2831 |
@message_transports = @{ $params->{message_transports} }; |
2831 |
@message_transports = @{ $params->{message_transports} }; |
2832 |
} |
2832 |
} |
2833 |
return unless defined $letter_code; |
2833 |
return unless defined $letter_code; |
|
|
2834 |
if ( $params->{expiry_notice_mandatory} ) { |
2835 |
push( @message_transports, $params->{primary_contact_method} || 'print' ) if scalar(@message_transports) == 0; |
2836 |
} |
2837 |
|
2834 |
$letter_params->{letter_code} = $letter_code; |
2838 |
$letter_params->{letter_code} = $letter_code; |
2835 |
my $print_sent = 0; |
2839 |
my $print_sent = 0; |
2836 |
my %return; |
2840 |
my %return; |