forked from extern/shorewall_code
Add semicolons in new actions.
Signed-off-by: Tom Eastep <teastep@shorewall.net>
This commit is contained in:
parent
20cee7649e
commit
1c199a2644
@ -36,7 +36,7 @@ FORMAT 2
|
|||||||
# The following magic provides different defaults for $2 thru $5, when $1 is
|
# The following magic provides different defaults for $2 thru $5, when $1 is
|
||||||
# 'audit'.
|
# 'audit'.
|
||||||
#
|
#
|
||||||
BEGIN PERL
|
BEGIN PERL;
|
||||||
use Shorewall::Config;
|
use Shorewall::Config;
|
||||||
|
|
||||||
my ( $p1, $p2, $p3 , $p4, $p5 ) = get_action_params( 5 );
|
my ( $p1, $p2, $p3 , $p4, $p5 ) = get_action_params( 5 );
|
||||||
@ -54,7 +54,7 @@ if ( defined $p1 ) {
|
|||||||
|
|
||||||
1;
|
1;
|
||||||
|
|
||||||
END PERL
|
END PERL;
|
||||||
|
|
||||||
DEFAULTS -,REJECT,DROP,ACCEPT,DROP
|
DEFAULTS -,REJECT,DROP,ACCEPT,DROP
|
||||||
|
|
||||||
|
@ -32,7 +32,7 @@ FORMAT 2
|
|||||||
# The following magic provides different defaults for $2 thru $5, when $1 is
|
# The following magic provides different defaults for $2 thru $5, when $1 is
|
||||||
# 'audit'.
|
# 'audit'.
|
||||||
#
|
#
|
||||||
BEGIN PERL
|
BEGIN PERL;
|
||||||
use Shorewall::Config;
|
use Shorewall::Config;
|
||||||
|
|
||||||
my ( $p1, $p2, $p3 , $p4, $p5 ) = get_action_params( 5 );
|
my ( $p1, $p2, $p3 , $p4, $p5 ) = get_action_params( 5 );
|
||||||
@ -50,7 +50,7 @@ if ( defined $p1 ) {
|
|||||||
|
|
||||||
1;
|
1;
|
||||||
|
|
||||||
END PERL
|
END PERL;
|
||||||
|
|
||||||
DEFAULTS -,REJECT,REJECT,ACCEPT,DROP
|
DEFAULTS -,REJECT,REJECT,ACCEPT,DROP
|
||||||
|
|
||||||
|
@ -36,7 +36,7 @@ FORMAT 2
|
|||||||
# The following magic provides different defaults for $2 thru $5, when $1 is
|
# The following magic provides different defaults for $2 thru $5, when $1 is
|
||||||
# 'audit'.
|
# 'audit'.
|
||||||
#
|
#
|
||||||
BEGIN PERL
|
BEGIN PERL;
|
||||||
use Shorewall::Config;
|
use Shorewall::Config;
|
||||||
|
|
||||||
my ( $p1, $p2, $p3 , $p4, $p5 ) = get_action_params( 5 );
|
my ( $p1, $p2, $p3 , $p4, $p5 ) = get_action_params( 5 );
|
||||||
@ -54,7 +54,7 @@ if ( defined $p1 ) {
|
|||||||
|
|
||||||
1;
|
1;
|
||||||
|
|
||||||
END PERL
|
END PERL;
|
||||||
|
|
||||||
DEFAULTS -,REJECT,DROP,ACCEPT,DROP
|
DEFAULTS -,REJECT,DROP,ACCEPT,DROP
|
||||||
|
|
||||||
|
@ -32,7 +32,7 @@ FORMAT 2
|
|||||||
# The following magic provides different defaults for $2 thru $5, when $1 is
|
# The following magic provides different defaults for $2 thru $5, when $1 is
|
||||||
# 'audit'.
|
# 'audit'.
|
||||||
#
|
#
|
||||||
BEGIN PERL
|
BEGIN PERL;
|
||||||
use Shorewall::Config;
|
use Shorewall::Config;
|
||||||
|
|
||||||
my ( $p1, $p2, $p3 , $p4, $p5 ) = get_action_params( 5 );
|
my ( $p1, $p2, $p3 , $p4, $p5 ) = get_action_params( 5 );
|
||||||
@ -50,7 +50,7 @@ if ( defined $p1 ) {
|
|||||||
|
|
||||||
1;
|
1;
|
||||||
|
|
||||||
END PERL
|
END PERL;
|
||||||
|
|
||||||
DEFAULTS -,REJECT,REJECT,ACCEPT,DROP
|
DEFAULTS -,REJECT,REJECT,ACCEPT,DROP
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user