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();
}