Allow to hide email from public 1.0 ONLY FOR YABB 1 GOLD BETA 5! This mod adds for each user the possibility to hide their email from public except the admin. You can also disable that feature in admin section. [CV]XXL http://xxl.cstrike.de Sources\Profile.pl $memsettings[18] =~ s/[\n\r]//g; $memsettings[19] =~ s/[\n\r]//g; EOT if ($allow_hide_email == 1) { print <<"EOT"; $txt{'721'} EOT } else { print <<"EOT"; EOT } print <<"EOT"; &FromHTML($memsettings[15]); # Location &FromHTML($memsettings[19]); # hide Email &ToHTML($member{'name'}); &ToHTML($FORM{'hideemail'}); print FILE "$member{'usertimeoffset'}\n"; if ($FORM{'hideemail'} ne "checked") { $FORM{'hideemail'} = ""; } print FILE "$FORM{'hideemail'}\n"; $icq = $memsettings[8]; $memsettings[19] =~ s/[\n\r]//g; $memsettings[2] EOT if ($memsettings[19] ne "checked" || $settings[7] eq "Administrator" || $allow_hide_email ne 1) { print <<"EOT"; $memsettings[2] EOT } else { print "$txt{'722'}"; } print <<"EOT"; Sources\Register.pl EOT if ($allow_hide_email == 1) { print <<"EOT"; $txt{'721'} EOT } else { print <<"EOT"; EOT } print <<"EOT"; print FILE "\n\n\n0\n\n\n\n\n\n$txt{'209'}\nblank.gif\n$date\n\n\n\n\n"; if ($FORM{'hideemail'} ne "checked") { $FORM{'hideemail'} = ""; } print FILE "$FORM{'hideemail'}\n"; Sources\Display.pl   $userprofile[4]  $img{'email'}$profbutton$sendm EOT if ($userprofile[19] ne "checked" || $settings[7] eq "Administrator" || $allow_hide_email ne 1) { print << "EOT";   $userprofile[4]  $img{'email'}$profbutton$sendm EOT } else { print << "EOT";   $userprofile[4]  $profbutton$sendm EOT } print << "EOT"; Sources\Memberlist.pl $member[1] $member[2] $member[1] ); if ($member[19] eq "checked" && $settings[7] ne "Administrator" && $allow_hide_email eq 1) { print qq( $txt{'722'} ); } else { print qq( $member[2] ); } print qq( $member[1] $member[2] $member[1] ); if ($member[19] eq "checked" && $settings[7] ne "Administrator" && $allow_hide_email eq 1) { print qq( $txt{'722'} ); } else { print qq( $member[2] ); } print qq( $member[1] $member[2] $member[1] ); if ($member[19] eq "checked" && $settings[7] ne "Administrator" && $allow_hide_email eq 1) { print qq( $txt{'722'} ); } else { print qq( $member[2] ); } print qq( Sources\Admin.pl $txt{'382'} EOT $checked = ""; if ($showlatestmember == 1) { $checked = "checked" } print <<"EOT"; $txt{'723'} EOT $checked = ""; if ($allow_hide_email == 1) { $checked = "checked" } print <<"EOT"; else { $mentype = "0" } $allow_hide_email = $FORM{'allow_hide_email'}; if ($allow_hide_email eq "on") { $allow_hide_email = "1" } else { $allow_hide_email = "0" } 1; ~; \$allow_hide_email = $allow_hide_email; # Allow users to hide their email from public. Set 0 to disable Settings.pl 1; $allow_hide_email = 1; # Allow users to hide their email from public. Set 0 to disable English.lng $txt{'703'} = "Thank you for registration. You will receive an email soon with your password. You may change the password after you login for the first time."; $txt{'721'} = "hide email from public"; $txt{'722'} = "hidden"; $txt{'723'} = "Allow users to hide their email from public (except admin)?";