[Netpass-devel] NetPass/www/htdocs/Admin/cmd setresult.mhtml,1.2,1.3
Brought to you by:
jeffmurphy
From: jeff m. <jef...@us...> - 2005-08-31 20:09:27
|
Update of /cvsroot/netpass/NetPass/www/htdocs/Admin/cmd In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv15191/www/htdocs/Admin/cmd Modified Files: setresult.mhtml Log Message: bug fixes, see CHANGES file, see message on netpass-users before deploying these changes Index: setresult.mhtml =================================================================== RCS file: /cvsroot/netpass/NetPass/www/htdocs/Admin/cmd/setresult.mhtml,v retrieving revision 1.2 retrieving revision 1.3 diff -u -d -r1.2 -r1.3 --- setresult.mhtml 4 May 2005 20:22:17 -0000 1.2 +++ setresult.mhtml 31 Aug 2005 20:09:17 -0000 1.3 @@ -25,7 +25,9 @@ my $ng = $np->cfg->getNetgroup(-network => $nw); my ($isOK, $groups) = $m->comp('/Admin/MemberOf', 'acl' => [ 'Admin', 'QuarAdmin' ]); my ($isRoot, $junk) = $m->comp('/Admin/MemberOf', 'acl' => [ 'Admin' ], 'group' => 'default'); - if ($isRoot || ($isOK && (grep (/^$nw$/, @$groups) || grep (/^$ng$/, @$groups)))) { + if ($isRoot || ($isOK && (grep (/^default$/, @$groups) || + grep (/^$nw$/, @$groups) || + grep (/^$ng$/, @$groups)))) { $rv = $np->db->updateResult(-mac => $ma, -rowid => $rid, -status => $st); if ($rv) { |