Fixed a bug in the outgoingfw where preselected groups where not

set if you edit a rule.
This commit is contained in:
Christian Schmidt
2010-12-10 12:10:47 +01:00
parent 15834b6222
commit 98c474a4aa
2 changed files with 6 additions and 3 deletions

View File

@@ -12,6 +12,7 @@ srv/web/ipfire/cgi-bin/proxy.cgi
srv/web/ipfire/cgi-bin/speed.cgi srv/web/ipfire/cgi-bin/speed.cgi
srv/web/ipfire/cgi-bin/vpnmain.cgi srv/web/ipfire/cgi-bin/vpnmain.cgi
srv/web/ipfire/cgi-bin/ids.cgi srv/web/ipfire/cgi-bin/ids.cgi
srv/web/ipfire/cgi-bin/outgoingfw.cgi
srv/web/ipfire/cgi-bin/pppsetup.cgi srv/web/ipfire/cgi-bin/pppsetup.cgi
srv/web/ipfire/html/images/urlfilter/copy.gif srv/web/ipfire/html/images/urlfilter/copy.gif
var/ipfire/general-functions.pl var/ipfire/general-functions.pl

View File

@@ -699,7 +699,8 @@ END
; ;
my @ipgroups = qx(ls $configpath/ipgroups/); my @ipgroups = qx(ls $configpath/ipgroups/);
foreach (sort @ipgroups){ foreach (sort @ipgroups){
print "\t\t\t\t\t<option value='$_' $selected{'SNET'}{'$_'}>$_</option>\n"; chomp($_);
print "\t\t\t\t\t<option value='$_' $selected{'SNET'}{$_}>$_</option>\n";
} }
print <<END print <<END
</optgroup> </optgroup>
@@ -708,7 +709,8 @@ END
; ;
my @macgroups = qx(ls $configpath/macgroups/); my @macgroups = qx(ls $configpath/macgroups/);
foreach (sort @macgroups){ foreach (sort @macgroups){
print "\t\t\t\t\t<option value='$_' $selected{'SNET'}{'$_'}>$_</option>\n"; chomp($_);
print "\t\t\t\t\t<option value='$_' $selected{'SNET'}{$_}>$_</option>\n";
} }
print <<END print <<END
</optgroup> </optgroup>
@@ -844,4 +846,4 @@ END
} }
&Header::closebigbox(); &Header::closebigbox();
&Header::closepage(); &Header::closepage();