oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fixed an ip filter problem

Browse source
This commit is contained in:
JT Smith 2003-06-06 15:12:25 +00:00
parent 1e3c97a477
commit 4c5886503f
1 changed files with 1 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

1
lib/WebGUI/Privilege.pm
View file

@ -241,6 +241,7 @@ sub isInGroup {
$group{ipFilter} =~ s/\r//g; $group{ipFilter} =~ s/\r//g;
$group{ipFilter} =~ s/\n//g; $group{ipFilter} =~ s/\n//g;
$group{ipFilter} =~ s/\s//g; $group{ipFilter} =~ s/\s//g;
$group{ipFilter} =~ s/\./\\\./g;
my @ips = split(";",$group{ipFilter}); my @ips = split(";",$group{ipFilter});
foreach my $ip (@ips) { foreach my $ip (@ips) {
if ($session{env}{REMOTE_ADDR} =~ /^$ip/) { if ($session{env}{REMOTE_ADDR} =~ /^$ip/) {