From 34c3828b7c0dc96fd88fc62acc2a83ffa6f8b7f9 Mon Sep 17 00:00:00 2001
From: Tom Eastep <teastep@shorewall.net>
Date: Mon, 14 Mar 2016 15:44:16 -0700
Subject: [PATCH] Fix action.Related

Signed-off-by: Tom Eastep <teastep@shorewall.net>
---
 Shorewall/action.Related | 20 +++-----------------
 1 file changed, 3 insertions(+), 17 deletions(-)

diff --git a/Shorewall/action.Related b/Shorewall/action.Related
index 7ecb39cfc..36014d775 100644
--- a/Shorewall/action.Related
+++ b/Shorewall/action.Related
@@ -30,20 +30,6 @@
 
 DEFAULTS DROP
 
-?begin perl;
-
-use strict;
-use Shorewall::IPAddrs;
-use Shorewall::Config;
-use Shorewall::Chains;
-use Shorewall::Rules;
-
-my ( $action ) = get_action_params( 1 );
-
-if ( my $check = check_state( 'RELATED' ) ) {
-    perl_action_helper( $action, $check == 1 ? state_match( 'RELATED' ) : '', 'RELATED' );
-}
-
-1;
-
-?end perl;
+#
+# All logic for this action is supplied by the 'state' option in actions.std
+#