Combine message into 1 template

root/etc/e-smith/templates-user/.lock-auto-reply/message.txt/00Setup

@@ -1,14 +0,0 @@
-{
-# vim: ft=perl:
-die "USERNAME not set." unless defined ($USERNAME);
-
-use esmith::AccountsDB;
-$adb = esmith::AccountsDB->open_ro or die "Couldn't open AccountsDB";
-
-$user = $adb->get($USERNAME) or die "No user $USERNAME in AccountsDB";
-
-%props = $user->props;
-$props{EmailForward} ||= 'local';
-
-$OUT = '';
-}

root/etc/e-smith/templates-user/.lock-auto-reply/message.txt/10Message

@@ -1,5 +1,6 @@
 {
 
+use esmith::AccountsDB;
 use esmith::I18N;
 use Locale::gettext;
 use MIME::Lite;
@@ -7,19 +8,28 @@ use MIME::Lite;
 my $i18n = new esmith::I18N;
 $i18n->setLocale('lockAutoReply.tmpl');
 
+die "USERNAME not set." unless defined ($USERNAME);
+
+$a = esmith::AccountsDB->open_ro or die "Couldn't open AccountsDB";  
+
+$user = $a->get($USERNAME) or die "No user $USERNAME in AccountsDB";
+%props = $user->props;
+$props{EmailForward} ||= 'local';
+
 my $fwd = ($props{EmailForward} =~ /^(forward|both)$/) ?
   sprintf(gettext("Your mail has been forwarded to %s"), ($props{ForwardAddress} || 'devnull@' . $DomainName)) . ".\n" .
   gettext("This forward is only temporary, you should update your addressbook.") : "";
 
 my $msg = MIME::Lite->new(
   Subject => gettext("This account is no longer valid"),
-  From    => "\$USER@" . $DomainName,
+  From    => 'no-reply@' . $DomainName,
   Data    => gettext("This is an automatic message in reply to your email with the following subject:") . "\n\n" .
              '%S' . "\n\n" .
-             gettext("I'm sorry to inform you that the email address \$RECIPIENT is no longer valid.") . "\n" . $fwd
+             gettext("I'm sorry to inform you that the email address \$RECIPIENT is no longer valid.") . "\n" . $fwd . "\n\n\n\n" .
+             gettext("Please note that this is an automatic email. Do not respond, it won't be treated')
 );
 
-$msg->scrub([ 'Date' ]);
+$msg->scrub([ 'Date', 'X-Mailer' ]);
 $msg->attr("content-type"         => "text/plain");
 $msg->attr("content-type.charset" => "utf-8");