From e5135cd62cb9677f6f9ca76e1a44ac0d034683ff Mon Sep 17 00:00:00 2001
From: teastep <teastep@fbd18981-670d-0410-9b5c-8dc0c1a9a2bb>
Date: Wed, 20 Jun 2007 13:25:16 +0000
Subject: [PATCH] Fix port-pair validation broken in last commit

git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@6613 fbd18981-670d-0410-9b5c-8dc0c1a9a2bb
---
 Shorewall-perl/Shorewall/Chains.pm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/Shorewall-perl/Shorewall/Chains.pm b/Shorewall-perl/Shorewall/Chains.pm
index 20e2fee9f..e7c41f0c6 100644
--- a/Shorewall-perl/Shorewall/Chains.pm
+++ b/Shorewall-perl/Shorewall/Chains.pm
@@ -783,6 +783,8 @@ sub validate_portpair( $ ) {
 	    }
 	    
 	    fatal_error "Invalid/Unknown port/service ($port)" unless defined $value;
+
+	    $port = $value;
 	}
 
 	if ( @ports == 2 ) {