diff --git a/Shorewall/Perl/Shorewall/Chains.pm b/Shorewall/Perl/Shorewall/Chains.pm index dce7085ba..7ba12bfed 100644 --- a/Shorewall/Perl/Shorewall/Chains.pm +++ b/Shorewall/Perl/Shorewall/Chains.pm @@ -1267,7 +1267,7 @@ sub ensure_accounting_chain( $$ ) my $file = find_file $chain; if ( -f $file ) { - progress_message "Processing $file..."; + progress_message "Running $file..."; my ( $level, $tag ) = ( '', '' ); diff --git a/Shorewall/Perl/Shorewall/Config.pm b/Shorewall/Perl/Shorewall/Config.pm index 0b7d93aff..9e63b3fc6 100644 --- a/Shorewall/Perl/Shorewall/Config.pm +++ b/Shorewall/Perl/Shorewall/Config.pm @@ -3480,7 +3480,7 @@ sub run_user_exit( $ ) { my $file = find_file $chainref->{name}; if ( -f $file ) { - progress_message2 "Processing $file..."; + progress_message2 "Running $file..."; my $command = qq(package Shorewall::User;\nno strict;\n# line 1 "$file"\n) . `cat $file`; @@ -3501,7 +3501,7 @@ sub run_user_exit1( $ ) { my $file = find_file $_[0]; if ( -f $file ) { - progress_message2 "Processing $file..."; + progress_message2 "Running $file..."; # # File may be empty -- in which case eval would fail # @@ -3532,7 +3532,7 @@ sub run_user_exit2( $$ ) { my ($file, $chainref) = ( find_file $_[0], $_[1] ); if ( -f $file ) { - progress_message2 "Processing $file..."; + progress_message2 "Running $file..."; # # File may be empty -- in which case eval would fail # diff --git a/Shorewall/Perl/Shorewall/Rules.pm b/Shorewall/Perl/Shorewall/Rules.pm index 9f10e987d..b1510a1b9 100644 --- a/Shorewall/Perl/Shorewall/Rules.pm +++ b/Shorewall/Perl/Shorewall/Rules.pm @@ -215,7 +215,7 @@ sub createlogactionchain( $$$$$ ) { my $file = find_file $chain; if ( -f $file ) { - progress_message "Processing $file..."; + progress_message "Running $file..."; my @params = split /,/, $param; @@ -249,7 +249,7 @@ sub createsimpleactionchain( $ ) { my $file = find_file $action; if ( -f $file ) { - progress_message "Processing $file..."; + progress_message "Running $file..."; my ( $level, $tag ) = ( '', '' );