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
Родитель 932901e260
Коммит f7fff78b74
1 изменённых файлов: 2 добавлений и 1 удалений

Просмотреть файл

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