Trivial optimiation in validate_level()

Signed-off-by: Tom Eastep <teastep@shorewall.net>
This commit is contained in:
Tom Eastep 2011-11-13 06:19:40 -08:00
parent 28a1087cd4
commit afaf0d9de8

View File

@ -2198,11 +2198,11 @@ sub validate_level( $ ) {
# #
# Must be LOGMARK # Must be LOGMARK
# #
return $rawlevel if $qualifier =~ /^ --/;
my $sublevel; my $sublevel;
if ( supplied $qualifier ) { if ( supplied $qualifier ) {
return $rawlevel if $qualifier =~ /^ --/;
if ( $qualifier =~ /[(](.+)[)]?$/ ) { if ( $qualifier =~ /[(](.+)[)]?$/ ) {
$sublevel = $1; $sublevel = $1;