[Tuxaator-commits] tuxaator BotCore.pm,1.11,1.12

[Andres S. <di...@us...>]

Update of /cvsroot/tuxaator/tuxaator
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv12869

Modified Files:
	BotCore.pm 
Log Message:
ignore the leading ~ when anchoring hostmasks for the purpose of user access level matching

Index: BotCore.pm
===================================================================
RCS file: /cvsroot/tuxaator/tuxaator/BotCore.pm,v
retrieving revision 1.11
retrieving revision 1.12
diff -C2 -d -r1.11 -r1.12
*** BotCore.pm	11 Feb 2005 20:04:27 -0000	1.11
--- BotCore.pm	11 Feb 2005 20:27:36 -0000	1.12
***************
*** 57,61 ****
  	while (($key, $value) = each %{$class->{"users"}})
  	{
! 		$allowed = 1 if ( ($hostmask =~ /^$key$/i) && ($value >= $level) );
  	};
  	if ($allowed)
--- 57,61 ----
  	while (($key, $value) = each %{$class->{"users"}})
  	{
! 		$allowed = 1 if ( ($hostmask =~ /^\~?$key$/i) && ($value >= $level) );
  	};
  	if ($allowed)