Catch self-invocation of an action

git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@6199 fbd18981-670d-0410-9b5c-8dc0c1a9a2bb

Shorewall-perl/Shorewall/Actions.pm

@@ -293,6 +293,8 @@ sub process_actions1() {
 
 		    fatal_error "Invalid TARGET ($target)" if $targettype & STANDARD;
 
+		    fatal_error "An action may not invoke itself" if $target eq $action;
+
 		    add_requiredby $wholetarget, $action if $targettype & ACTION;
 		} else {
 		    $target =~ s!/.*$!!;