Bug 358399 - improve address munging, to see if it helps.

This commit is contained in:
gerv%gerv.net 2006-11-17 13:08:39 +00:00
parent 981df90743
commit 1191ce45b3

View File

@ -110,7 +110,8 @@ exit;
# Simple email obfuscation
sub emailFilter {
my ($var) = @_;
$var =~ s/\@/_at_/;
$var =~ s/\@/at/;
$var =~ s/\./dot/;
return $var;
}