not to be dense but what's the email for them? I'll be more then happy to send it...

-----Original Message-----
From: [CV]XXL [mailto:X_X_L@gmx.net]
Sent: Friday, March 14, 2003 2:31 PM
To: boardmod-devel@lists.sourceforge.net
Subject: Re: [Boardmod-devel] security.pl mod?


Hi Ryan,

Your code looks good so far, my only concern is the place where you
posted this. As this does not really introduce any new functionalilty in
the current YaBB release, it would not be worth it to make a mod out of
it. But this looks like an interesting suggestion for upcomming YaBB
versions. So I suggest you to send this idea to the YaBB development
team instead of us, we only develop the modification software :-)

Michael Prager
BoardMod.org Webmaster

FARRINGTON, RYAN wrote:

> just joined so I don't know if anyone has already done this but here
> ya go...
>
> I've added a few modifications to security.pl that compensates for
> people being in multiple groups.  code snip below:
>
> technically I'm being redundent with in_group and is_admin3 but I felt
> it necessary =P
>
> so in theory this:
> if( $settings[7] eq 'Administrator' || $settings[7] eq 'Global
> Moderator') {
>
> would become this:
> if( is_admin3($settings[7]) || in_group($settings[7], 'Global
> Moderator') ) { 
>
> ## BEGIN SNIP
>
> sub is_admin {
>         if( !(is_admin3($settings[7]) ) ) { &fatal_error($txt{'1'}); }
> }
>
> sub is_admin2 {
>         if( !(is_admin3($settings[7]) ) ) { &fatal_error($txt{'134'}); }
> }
>
> sub is_admin3 {
>         my $testgroup = @_[0];
>         my $result = 0;
>         my @testgroup = split(/\|/, $testgroup);
>         foreach my $test (@testgroup){
>                 if ($test eq 'Administrator'){
>                         $result = 1;
>                 }
>         }
>         return $result;
> }
>
> sub in_group {
>         my $testgroup = @_[0];
>         my $checkgroup = @_[1];
>         my $result = 0;
>         my @testgroup = split(/\|/, $testgroup);
>         foreach my $test (@testgroup){
>                 if($test eq $checkgroup){
>                         $result = 1;
>                 }
>         }
>         return $result;
> }
>
> ### END SNIP
>
> as always if you use it give credit. =)
>




-------------------------------------------------------
This SF.net email is sponsored by:Crypto Challenge is now open!
Get cracking and register here for some mind boggling fun and
the chance of winning an Apple iPod:
http://ads.sourceforge.net/cgi-bin/redirect.pl?thaw0031en
_______________________________________________
Boardmod-devel mailing list
Boardmod-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/boardmod-devel