From 2d53f8cb0caa3b54f616424292ccd43b738f96d8 Mon Sep 17 00:00:00 2001
From: Tom Eastep <teastep@shorewall.net>
Date: Wed, 11 Nov 2009 16:35:46 -0800
Subject: [PATCH] Delete unnecessary function

---
 Shorewall/Perl/Shorewall/Chains.pm | 11 +----------
 1 file changed, 1 insertion(+), 10 deletions(-)

diff --git a/Shorewall/Perl/Shorewall/Chains.pm b/Shorewall/Perl/Shorewall/Chains.pm
index 991a1a61b..e997363d7 100644
--- a/Shorewall/Perl/Shorewall/Chains.pm
+++ b/Shorewall/Perl/Shorewall/Chains.pm
@@ -2888,15 +2888,6 @@ sub emitr( $ ) {
     }
 }
 
-#
-# Simple version that only handles rules
-#
-sub emitr1( $ ) {
-    my $rule = $_[0];
-
-    emit_unindented $rule;
-}
-
 #
 # Generate the netfilter input
 #
@@ -3184,7 +3175,7 @@ sub create_stop_load( $ ) {
 	# Then emit the rules
 	#
 	for my $chainref ( @chains ) {
-	    emitr1 $_ for @{$chainref->{rules}};
+	    emit_unindented $_ for @{$chainref->{rules}};
 	}
 	#
 	# Commit the changes to the table