From 51d002bdef1b032bdb23c1591e05d27e22c895fc Mon Sep 17 00:00:00 2001
From: Christian Schmidt <christian.schmidt@ipfire.org>
Date: Sun, 2 May 2010 22:18:12 +0200
Subject: [PATCH] Fixed the missing display of the last chains in the tables.

---
 html/cgi-bin/iptables.cgi | 11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

diff --git a/html/cgi-bin/iptables.cgi b/html/cgi-bin/iptables.cgi
index 080371b37..886330d0e 100644
--- a/html/cgi-bin/iptables.cgi
+++ b/html/cgi-bin/iptables.cgi
@@ -106,8 +106,9 @@ END
 		}
 
 		$lines++;
-	   
+
 	}
+	$chains{$chainname."end"} = $lines-1;
 	close (FILE);
 
 # now the chain hash is extracted to get the correct name of the chain
@@ -119,7 +120,7 @@ END
 # colored gui
 
 	print "<form method='post' action='$ENV{'SCRIPT_NAME'}'>\n<select name='selectedchain' style='width: 250px'>\n";
-	foreach (keys(%chains)){
+	foreach (sort(keys(%chains))){
 
 		if ( $_ =~ /end$/ ){
 			next;
@@ -229,6 +230,7 @@ END
 		$manlines++;
 	   
 	}
+	$chainsman{$chainname."end"} = $manlines-1;
 	close (FILE);
 
 # now the chain hash is extracted to get the correct name of the chain
@@ -240,7 +242,7 @@ END
 # colored gui
 
 	print "<form method='post' action='$ENV{'SCRIPT_NAME'}'>\n<select name='selectedchain' style='width: 250px'>\n";
-	foreach (keys(%chainsman)){
+	foreach (sort(keys(%chainsman))){
 
 		if ( $_ =~ /end$/ ){
 			next;
@@ -355,6 +357,7 @@ END
 		$natlines++;
 	   
 	}
+	$chainsnat{$chainname."end"} = $natlines-1;
 	close (FILE);
 
 # now the chain hash is extracted to get the correct name of the chain
@@ -366,7 +369,7 @@ END
 # colored gui
 
 	print "<form method='post' action='$ENV{'SCRIPT_NAME'}'>\n<select name='selectedchain' style='width: 250px'>\n";
-	foreach (keys(%chainsnat)){
+	foreach (sort(keys(%chainsnat))){
 
 		if ( $_ =~ /end$/ ){
 			next;