From bd9bf3d43a3574e0bdee7b06743a90c9235fdbf2 Mon Sep 17 00:00:00 2001 From: Tom Eastep Date: Sat, 2 Jul 2011 07:02:18 -0700 Subject: [PATCH] Rename & export get_actionchain() -> get_action_chain() Signed-off-by: Tom Eastep --- Shorewall/Perl/Shorewall/Config.pm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/Shorewall/Perl/Shorewall/Config.pm b/Shorewall/Perl/Shorewall/Config.pm index aeab99703..29315ca2f 100644 --- a/Shorewall/Perl/Shorewall/Config.pm +++ b/Shorewall/Perl/Shorewall/Config.pm @@ -53,6 +53,7 @@ our @EXPORT = qw( progress_message3 supplied get_action_params + get_action_chain set_action_param ); @@ -1806,7 +1807,7 @@ sub push_action_params( $$ ) { @actparms = (); - $actparms[0] = $_[0]; + $actparms[0] = $_[0]; for ( my $i = 1; $i <= @params; $i++ ) { my $val = $params[$i - 1]; @@ -1840,7 +1841,7 @@ sub get_action_params( $ ) { @actparms[1..$num]; } -sub get_actionchain() { +sub get_action_chain() { $actparms[0]; }