From c80b1b3585af24fc8aae762d2bcae4b49d5f3563 Mon Sep 17 00:00:00 2001
From: Tom Eastep <teastep@shorewall.net>
Date: Thu, 19 Aug 2010 15:33:49 -0700
Subject: [PATCH] Correct types in do_ipsec()

---
 Shorewall/Perl/Shorewall/Chains.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/Shorewall/Perl/Shorewall/Chains.pm b/Shorewall/Perl/Shorewall/Chains.pm
index d95397a6a..5ef6582b3 100644
--- a/Shorewall/Perl/Shorewall/Chains.pm
+++ b/Shorewall/Perl/Shorewall/Chains.pm
@@ -354,7 +354,7 @@ sub initialize( $ ) {
     #
     # Current rules file section.
     #
-    $section  = 'ESTABLISHED';
+    $section  = '';
     #
     # Contents of last COMMENT line.
     #
@@ -2691,11 +2691,11 @@ sub do_ipsec($) {
 	
 	if ( @options == 1 ) {
 	    if ( lc( $options[0] ) =~ /^(yes|ipsec)$/ ) {
-		return do_ipsec_option $dir, 'ipsec', '';
+		return do_ipsec_options $dir, 'ipsec', '';
 	    } 
 
 	    if ( lc( $options[0] ) =~ /^(no|none)$/ ) {
-		return do_ipsec_option $dir, 'ipsec', '';
+		return do_ipsec_options $dir, 'none', '';
 	    }
 	}