diff options
author | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-10-31 01:51:30 +0000 |
---|---|---|
committer | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-10-31 01:51:30 +0000 |
commit | ccb7930217a5c1c7cb5341514072cb5e070a888e (patch) | |
tree | 8d51affefb50bc6542bdfd76007062afa1de28c1 /bin/io.pl | |
parent | bfcb723e7a4e002123c2d0fac8c262388cc4d2fe (diff) |
Some string cleaning
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@411 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'bin/io.pl')
-rwxr-xr-x | bin/io.pl | 10 |
1 files changed, 5 insertions, 5 deletions
@@ -1468,15 +1468,15 @@ sub print_form { } $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}; if (defined %$old_form) { $old_form->{intnotes} = qq|$old_form->{intnotes}\n\n| if $old_form->{intnotes}; $old_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|; + .$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|; $old_form->{intnotes} .= qq|\n|.$locale->text('Message').qq|: |; $old_form->{intnotes} .= ($form->{message}) ? $form->{message} : $locale->text('sent'); |