From 1528cc2094075b77a2e449caf9a0243dd731f504 Mon Sep 17 00:00:00 2001
From: Tom Eastep <teastep@shorewall.net>
Date: Sat, 24 Jul 2010 11:50:10 -0700
Subject: [PATCH] Correct RE in split_action()

---
 Shorewall/Perl/Shorewall/Actions.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Shorewall/Perl/Shorewall/Actions.pm b/Shorewall/Perl/Shorewall/Actions.pm
index da28b4d22..f033577af 100644
--- a/Shorewall/Perl/Shorewall/Actions.pm
+++ b/Shorewall/Perl/Shorewall/Actions.pm
@@ -190,7 +190,7 @@ sub split_action ( $ ) {
     #
     # The param may contain one or more ':' characters
     #
-    if ( $action =~ /^([^(:]+\(.*?\))(:(.*))$/ ) {
+    if ( $action =~ /^([^(:]+\(.*?\))(:(.*))?$/ ) {
 	$target = $1;
 	$action = $2 ? $3 : '';
 	$max    = 2;