diff options
author | Matthias Andreas Benkard <code@mail.matthias.benkard.de> | 2014-05-05 14:36:43 +0200 |
---|---|---|
committer | Matthias Andreas Benkard <code@mail.matthias.benkard.de> | 2014-05-13 21:07:24 +0200 |
commit | 0db96cce9f83f09b07a46f31f9930e5b7cc19f6f (patch) | |
tree | 577ed4c85e1346193b5fe5e4e6fef0a4abb77d87 /www/common.pl | |
parent | d8907f11f5c255727b8a814746a0114e5c62e30a (diff) |
Fix bugs introduced by the previous patch.
Diffstat (limited to 'www/common.pl')
-rw-r--r-- | www/common.pl | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/www/common.pl b/www/common.pl index 3f3a5b0..736bf00 100644 --- a/www/common.pl +++ b/www/common.pl @@ -14,9 +14,12 @@ sub load_config() { } sub email_users($) { - return @_ - if $::MULKONF->{auth_type} eq 'google'; my ($email) = @_; + my $fakedomain = $::MULKONF->{fake_domain}; + my $realdomain = $::MULKONF->{real_domain}; + $email =~ s/\@$realdomain/\@$fakedomain/ if $fakedomain; + return ($email) + if $::MULKONF->{auth_type} eq 'google'; my $alias; if ($email =~ /^(.*?)@/) { $alias = $1; } my $aliases_file = $::MULKONF->{aliases}; |