forked from extern/shorewall_code
Correct tcrules update
Signed-off-by: Tom Eastep <teastep@shorewall.net> Conflicts: Shorewall/Perl/Shorewall/Tc.pm
This commit is contained in:
parent
2ab8bd3040
commit
4cc7a1b87d
@ -3226,12 +3226,17 @@ sub setup_tc( $ ) {
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
close $mangle, directive_callback( 0 ) if $tcrules;
|
||||||
|
|
||||||
|
} elsif ( $tcrules ) {
|
||||||
close $mangle, directive_callback( 0 );
|
close $mangle, directive_callback( 0 );
|
||||||
} elsif ( -f ( my $fn = find_file( 'tcrules' ) ) ) {
|
|
||||||
if ( unlink $fn ) {
|
if ( -f ( my $fn = find_file( 'tcrules' ) ) ) {
|
||||||
warning_message "Empty tcrules file ($fn) removed";
|
if ( unlink $fn ) {
|
||||||
} else {
|
warning_message "Empty tcrules file ($fn) removed";
|
||||||
warning_message "Unable to remove empty tcrules file $fn: $!";
|
} else {
|
||||||
|
warning_message "Unable to remove empty tcrules file $fn: $!";
|
||||||
|
}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
} elsif ( -f ( my $fn = find_file( 'tcrules' ) ) ) {
|
} elsif ( -f ( my $fn = find_file( 'tcrules' ) ) ) {
|
||||||
|
Loading…
x
Reference in New Issue
Block a user