X-Git-Url: http://git.ipfire.org/?p=people%2Fteissler%2Fipfire-2.x.git;a=blobdiff_plain;f=html%2Fcgi-bin%2Fforwardfw.cgi;h=caaba21687f45a046f76a3e6d0cb48e0d4327851;hp=1f5ea0044dbbc007a8855707c97dbd2635634af7;hb=e534554162a34ae47d135f3df251caac14502628;hpb=9bdb6b504536142e57acf9d967dc29aea47f09cf

diff --git a/html/cgi-bin/forwardfw.cgi b/html/cgi-bin/forwardfw.cgi
index 1f5ea0044..caaba2168 100755
--- a/html/cgi-bin/forwardfw.cgi
+++ b/html/cgi-bin/forwardfw.cgi
@@ -512,6 +512,7 @@ sub deleterule
 	my %delhash=();
 	&General::readhasharray($fwdfwsettings{'config'}, \%delhash);
 	foreach my $key (sort keys %delhash){
+		
 		if ($key eq $fwdfwsettings{'key'}){
 			#check hosts/net and groups
 			&checkcounter($delhash{$key}[3],$delhash{$key}[4],,);
@@ -521,11 +522,10 @@ sub deleterule
 				&checkcounter($delhash{$key}[14],$delhash{$key}[15],,);
 			}
 		}
-		
 		if ($key ge $fwdfwsettings{'key'}) {
 			my $next = $key + 1;
 			if (exists $delhash{$next}) {
-				foreach my $i (0 .. $#{$configfwdfw{$next}}) {
+				foreach my $i (0 .. $#{$delhash{$next}}) {
 					$delhash{$key}[$i] = $delhash{$next}[$i];
 				}
 			}
@@ -537,6 +537,7 @@ sub deleterule
 
 	&General::writehasharray($fwdfwsettings{'config'}, \%delhash);
 	&rules;
+	
 	if($fwdfwsettings{'nobase'} ne 'on'){
 		&base;
 	}