Code (Perl)

            if ( $email_ban ) {
                LoadLanguage('Email');
                if ( $lev eq 'p' ) {
                    $banned_time  = $profile_txt{'p'};
                    $bannedsubj   = $security_txt{'banned'};
                    $bemail       = $banneduseremail;
                    $busersybject = $bannedusersybject;
                }
                else {
                    $tmp = time_ban();
                    $banned_time =
                      qq~$security_txt{'ban_permt'} ~ . timeformat($tmb);
                    $bannedsubj   = $security_txt{'suspend'};
                    $bemail       = $suspendeduseremail;
                    $busersybject = $suspendusersybject;
                }
                $bannedfor = q{};
                if ($ban_reason) {
                    $bannedfor =
                      $security_txt{'ban_warn_b'} . $ban_reason . q{ };
                }
                $language = ${ $uid . $username }{'language'};
                require Sources::Mailer;
                my $message = template_email(
                    $bemail,
                    {
                        'banner'      => ${ $uid . $username }{'realname'},
                        'ban_time'    => $banned_time,
                        'ban_reason'  => $bannedfor,
                        'subject'     => $bannedsubj,
                        'displayname' => ${ $uid . $user }{'realname'},
                    }
                ); 

Code

1; 

Code

$yabbtags{'banneduseremail'} = q~scherm naam~;
$emaildesc{'banneduseremail'} = q~De verbannen gebruiker Notificatie email~;
$bannedusersybject = q~Uw account verbannen op~;
$banneduseremail = q~Hallo, {yabb displayname}:

U bent verbannen van {yabb mbname} {yabb ban_time} door {yabb banner}{yabb ban_reason}.

Met vriendelijke groet,
Het {yabb mbname} team
<a href="{yabb scripturl}">{yabb scripturl}</a>
~;

$yabbtags{'suspendeduseremail'} = q~scherm naam~;
$emaildesc{'suspendeduseremail'} = q~De verbannen gebruiker Notificatie email~;
$suspendusersybject = q~Uw account is geschorst op~;
$suspendeduseremail = q~Hallo, {yabb displayname}:

Uw account op {yabb mbname} is geschorst {yabb ban_time} door {yabb banner}{yabb ban_reason}.

Met vriendelijke groet,
Het {yabb mbname} team
<a href="{yabb scripturl}">{yabb scripturl}</a>
~;

 

Code

1; 

Code

$profile_txt{'ban_page'} = q~Verbod op~;
$profile_txt{'ban_enter'} = q~Verbod~;
$profile_txt{'ban_cancel'} = q~Annuleren~;
$profile_txt{'ban_reason'} = 'Reden voor het verbod op <span class="small">(Optioneel)</span>';
$profile_txt{'email_ban'} = 'Email gebruiker met betrekking tot verbod';
$profile_txt{'ban_for'} = 'voor een';