Avoid emitting out-of-function statements.

Signed-off-by: Tom Eastep <teastep@shorewall.net>
This commit is contained in:
Tom Eastep 2011-08-30 16:55:44 -07:00
parent 78a25bb51b
commit b8951259bd

View File

@ -1259,14 +1259,10 @@ sub process_tc_filter() {
progress_message " IPv4 TC Filter \"$currentline\" $done"; progress_message " IPv4 TC Filter \"$currentline\" $done";
$currentline =~ s/\s+/ /g; $currentline =~ s/\s+/ /g;
save_progress_message_short qq(' IPv4 TC Filter \"$currentline\" defined.');
} else { } else {
progress_message " IPv6 TC Filter \"$currentline\" $done"; progress_message " IPv6 TC Filter \"$currentline\" $done";
$currentline =~ s/\s+/ /g; $currentline =~ s/\s+/ /g;
save_progress_message_short qq(' IPv6 TC Filter \"$currentline\" defined.');
} }
emit ''; emit '';
@ -1283,7 +1279,7 @@ sub process_tcfilters() {
if ( $fn ) { if ( $fn ) {
my @family = ( $family ); my @family = ( $family );
first_entry( sub { progress_message2 "$doing $fn..."; save_progress_message q("Adding TC Filters"); } ); first_entry( "$doing $fn..." );
while ( read_a_line ) { while ( read_a_line ) {
if ( $currentline =~ /^\s*IPV4\s*$/ ) { if ( $currentline =~ /^\s*IPV4\s*$/ ) {