Correct typo in a regular expression.

- Re-enable |<mark> in the tctrules file.

Signed-off-by: Tom Eastep <teastep@shorewall.net>
This commit is contained in:
Tom Eastep 2013-10-21 07:04:23 -07:00
parent 8fb1ce6810
commit 5823411091

View File

@ -645,7 +645,7 @@ our %tccmd;
unless ( $classid ) { unless ( $classid ) {
{ {
if ( $cmd =~ /^([[A-Z!&]+)/ ) { if ( $cmd =~ /^([[A-Z|&]+)/ ) {
if ( my $tccmd = $tccmd{$1} ) { if ( my $tccmd = $tccmd{$1} ) {
fatal_error "Invalid $1 ACTION ($originalmark)" unless $tccmd->{match}($cmd); fatal_error "Invalid $1 ACTION ($originalmark)" unless $tccmd->{match}($cmd);
fatal_error "$mark not valid with :C[FPT]" if $connmark; fatal_error "$mark not valid with :C[FPT]" if $connmark;