Bug 358399 - make "dot" munging in email addresses global, instead of just doing the first one.

This commit is contained in:
gerv%gerv.net 2006-12-18 15:33:38 +00:00
parent 050bb0ad77
commit 530181537f

View File

@ -130,7 +130,7 @@ exit;
sub emailFilter {
my ($var) = @_;
$var =~ s/\@/at/;
$var =~ s/\./dot/;
$var =~ s/\./dot/g;
return $var;
}