diff options
Diffstat (limited to 'bin/arap.pl')
| -rwxr-xr-x | bin/arap.pl | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/bin/arap.pl b/bin/arap.pl index 7da220d7..6ddd6e7e 100755 --- a/bin/arap.pl +++ b/bin/arap.pl @@ -711,7 +711,7 @@ sub schedule { |; - $title = $locale->text('Recurring Transaction') ." ". $locale->text('for') ." $description"; + $title = $locale->text('Recurring Transaction for [_1]', $description); $form->header; @@ -906,15 +906,15 @@ sub reprint { if ($form->{media} eq 'email') { # add email message $now = scalar localtime; - $cc = $locale->text('Cc').qq|: $form->{cc}\n| if $form->{cc}; - $bcc = $locale->text('Bcc').qq|: $form->{bcc}\n| if $form->{bcc}; + $cc = $locale->text('Cc: [_1]', $form->{cc}).qq|\n| if $form->{cc}; + $bcc = $locale->text('Bcc: [_1]', $form->{bcc}).qq|\n| if $form->{bcc}; $form->{intnotes} .= qq|\n\n| if $form->{intnotes}; $form->{intnotes} .= qq|[email]\n| - .$locale->text('Date').qq|: $now\n| - .$locale->text('To').qq|: $form->{email}\n${cc}${bcc}| - .$locale->text('Subject').qq|: $form->{subject}\n\n| - .$locale->text('Message').qq|: |; + .$locale->text('Date: [_1]', $now).qq|\n| + .$locale->text('To: [_1]\n[_2][_3]', $form->{email}, ${cc}, ${bcc}) + .$locale->text('Subject: [_1]', $form->{subject}).qq|\n\n| + .$locale->text('Message: '); $form->{intnotes} .= ($form->{message}) ? $form->{message} : $locale->text('sent'); |