extern/shorewall_code
1
0
Fork 1
mirror of https://gitlab.com/shorewall/code.git synced 2025-06-21 02:08:48 +02:00
Code Issues Packages Projects Releases Wiki Activity

Fix INLINE in tcrles

Browse Source 
Signed-off-by: Tom Eastep <teastep@shorewall.net>
This commit is contained in:
Tom Eastep 2013-12-18 09:19:35 -08:00
parent cd5be38cfb
commit f32a777099
1 changed files with 8 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
Shorewall/Perl/Shorewall/Tc.pm
View File

@ -318,10 +318,14 @@ sub process_tc_rule1( $$$$$$$$$$$$$$$$ ) {
my $raw = ''; my $raw = '';
if ( $originalmark =~ /^INLINE\((.+)\)(:.*)?$/ ) { if ( $originalmark =~ /^INLINE(\((.+)\))?(:.*)?$/ ) {
$originalmark = $1; if ( $1 ) {
$originalmark .= $2 if $2; $originalmark = $2;
$originalmark .= $3 if $3;
$raw = get_inline_matches(0); $raw = get_inline_matches(0);
} else {
$raw = get_inline_matches(1);
}
} elsif ( $config{INLINE_MATCHES} ) { } elsif ( $config{INLINE_MATCHES} ) {
$raw = get_inline_matches(0); $raw = get_inline_matches(0);
} }