#
#========================================================================
#
-# Version 2.1.0_CVS, released 3 Jul 2003.
+# Version 3.0.0beta2, released 11 Nov 2006.
#
# See http://backuppc.sourceforge.net.
#
foreach my $t ( sort({$b <=> $a} keys(%EmailStr)) ) {
$str .= $EmailStr{$t};
}
- Header($Lang->{Email_Summary});
- print (eval("qq{$Lang->{Recent_Email_Summary}}"));
+ my $content = eval("qq{$Lang->{Recent_Email_Summary}}");
+ Header($Lang->{Email_Summary}, $content);
Trailer();
}