From 803c62d22eb4e2eb3a79a66a03dc0e8a9da23e01 Mon Sep 17 00:00:00 2001 From: tetragon Date: Thu, 2 Nov 2006 06:58:01 +0000 Subject: Converting Mailer to using MIME::Lite git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@464 4979c152-3d1c-0410-bac9-87ea11338e46 --- bin/am.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'bin') diff --git a/bin/am.pl b/bin/am.pl index 76423e9a..54f93163 100755 --- a/bin/am.pl +++ b/bin/am.pl @@ -2245,7 +2245,7 @@ sub save_preferences { sub backup { if ($form->{media} eq 'email') { - $form->error($locale->text('No email address for')." $myconfig{name}") unless ($myconfig{email}); + $form->error($locale->text('No email address for [_1]', $myconfig{name})) unless ($myconfig{email}); $form->{OUT} = "${LedgerSMB::Sysconfig::sendmail}"; @@ -2255,7 +2255,7 @@ sub backup { AM->backup(\%myconfig, \%$form, ${LedgerSMB::Sysconfig::userspath}, ${LedgerSMB::Sysconfig::gzip}); if ($form->{media} eq 'email') { - $form->redirect($locale->text('Backup sent to').qq| $myconfig{email}|); + $form->redirect($locale->text('Backup sent to [_1]', $myconfig{email})); } } -- cgit v1.2.3