[Netpass-devel] NetPass/www/htdocs/Admin netgroups.mhtml,1.3,1.4
Brought to you by:
jeffmurphy
|
From: jeff m. <jef...@us...> - 2005-05-05 02:19:43
|
Update of /cvsroot/netpass/NetPass/www/htdocs/Admin In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv2050/www/htdocs/Admin Modified Files: netgroups.mhtml Log Message: netgroup auditing bugfix Index: netgroups.mhtml =================================================================== RCS file: /cvsroot/netpass/NetPass/www/htdocs/Admin/netgroups.mhtml,v retrieving revision 1.3 retrieving revision 1.4 diff -u -d -r1.3 -r1.4 --- netgroups.mhtml 4 May 2005 20:22:17 -0000 1.3 +++ netgroups.mhtml 5 May 2005 02:19:34 -0000 1.4 @@ -63,7 +63,7 @@ </%perl> </script> -<h2> Network Configuration </h2> +<h2> Netgroup Configuration </h2> Notes: <ul> @@ -97,7 +97,7 @@ _log("DEBUG", "$ip $whoami added netgroup $netgroups\n"); $np->db->audit(-severity => 'NOTICE', -ip => $ip, -user => $whoami, - "added netgroup $netgroups"); + -msg => [ "added netgroup $netgroups" ]); $np->cfg->createNetgroup(-name => $netgroups); } @@ -121,7 +121,7 @@ # the user wants $nw to be a part of this netgroup _log("DEBUG", "$ip $whoami placed $nw into netgroup $netgroups\n"); $np->db->audit(-severity => 'NOTICE', -ip => $ip, -user => $whoami, - "placed $nw into netgroup $netgroups"); + -msg => ["placed $nw into netgroup $netgroups"]); $np->cfg->setNetgroup(-network => $nw, -group => $netgroups); } else { @@ -133,7 +133,7 @@ if ($x eq $netgroups) { _log("DEBUG", "$ip $whoami removed $nw from netgroup $netgroups\n"); $np->db->audit(-severity => 'NOTICE', -ip => $ip, -user => $whoami, - "removed $nw from netgroup $netgroups"); + -msg=>["removed $nw from netgroup $netgroups"]); $np->cfg->setNetgroup(-network => $nw); } } @@ -152,7 +152,7 @@ if (ref($members) eq "ARRAY" && ($#{$members} == -1)) { _log("DEBUG", "$ip $whoami $ngn has no members. deleting.\n"); $np->db->audit(-severity => 'NOTICE', -ip => $ip, -user => $whoami, - "$ngn has no members. deleting."); + -msg=>["$ngn has no members. deleting."]); if ( $rv = $np->cfg->delNetgroup(-group => $ngn) ) { _log("DEBUG", "$ip $whoami failed to delete empty netgroup $ngn: $rv\n"); } |