[Netpass-devel] NetPass/www/components/Admin FormNPSnort,1.1,1.2

[Matt <mt...@us...>]

Update of /cvsroot/netpass/NetPass/www/components/Admin
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv31124

Modified Files:
	FormNPSnort 
Log Message:


Index: FormNPSnort
===================================================================
RCS file: /cvsroot/netpass/NetPass/www/components/Admin/FormNPSnort,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- FormNPSnort	8 Jun 2005 02:37:55 -0000	1.1
+++ FormNPSnort	8 Jun 2005 02:57:21 -0000	1.2
@@ -6,7 +6,6 @@
 </%args>
 
 <%perl>
-	my $anychanges = 0;
 	if ($submit eq "Commit Changes") {
 
 		my $c = getconfigobj($network);
@@ -19,12 +18,15 @@
 			my $var;
 			if ($nparg =~ /^snort:(.+)$/) {
 				$var        = $1;
-				$anychanges = 1;
 			} else {
 				next;
 			}
 
-			if ($var =~ /^rorw_(.+)$/) {
+			if ($var eq 'mode') {
+				if ($ARGS{$nparg} =~ /^(enabled|disabled|not_really)$/) {
+					$c->mode($ARGS{$nparg});
+				}
+			} elsif ($var =~ /^rorw_(.+)$/) {
 				my $v = $1;
 				if ($c->exists('servers') && $c->obj('servers')->exists($v) &&
 				    $ARGS{$nparg} =~ /^(ro|rw)$/) {
@@ -50,7 +52,7 @@
 				}
 			}
 		}
-		$np->cfg->save(-user => $m->session->{'username'}) if $anychanges;
+		$np->cfg->save(-user => $m->session->{'username'});
 	}
 
 sub getsnortvalue {