From 036d54a269ac779b18d6b294a2e3e94e72aa3b0b Mon Sep 17 00:00:00 2001
From: teastep <teastep@fbd18981-670d-0410-9b5c-8dc0c1a9a2bb>
Date: Fri, 4 May 2007 20:18:31 +0000
Subject: [PATCH] Fix another silly typo

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

diff --git a/Shorewall-perl/Shorewall/Tunnels.pm b/Shorewall-perl/Shorewall/Tunnels.pm
index 6c38a693c..7317b0837 100644
--- a/Shorewall-perl/Shorewall/Tunnels.pm
+++ b/Shorewall-perl/Shorewall/Tunnels.pm
@@ -63,7 +63,7 @@ sub setup_tunnels() {
 	add_rule $outchainref,  "-p udp $dest --dport 500 $options";
 
 	if ( $kind eq 'ipsec' ) {
-	    add_rule $inchainref, "-p udp $source --dport $options";
+	    add_rule $inchainref, "-p udp $source --dport 500 $options";
 	} else {
 	    add_rule $inchainref,  "-p udp $source -m multiport --dports 500,4500 $options";
 	    add_rule $outchainref, "-p udp $dest   -m multiport --dports 500,4500 $options";