Remove warning when using special session keys in whatToTrace #2232
This commit is contained in:
parent
5ada67bf47
commit
dcfd2a8968
|
@ -90,8 +90,7 @@ qr/^(?:(?:(?:(?:(?:(?:[a-zA-Z0-9][-a-zA-Z0-9]*)?[a-zA-Z0-9])[.])*(?:[a-zA-Z][-a-
|
|||
'form' => 'text',
|
||||
'test' => sub {
|
||||
my ( $val, $conf ) = @_;
|
||||
return 1
|
||||
if defined $conf->{'macros'}{$val} or $val eq '_timezone';
|
||||
return 1 if defined $conf->{'macros'}{$val} or $val =~ /^_/;
|
||||
foreach $_ ( keys %$conf ) {
|
||||
return 1
|
||||
if $_ =~ /exportedvars$/i and defined $conf->{$_}{$val};
|
||||
|
|
|
@ -81,7 +81,7 @@ sub types {
|
|||
my ( $val, $conf ) = @_;
|
||||
return 1
|
||||
if ( defined $conf->{macros}->{$val}
|
||||
or $val eq '_timezone' );
|
||||
or $val =~ m/^_/ );
|
||||
foreach ( keys %$conf ) {
|
||||
return 1
|
||||
if ( $_ =~ /exportedvars$/i
|
||||
|
|
Loading…
Reference in New Issue
Block a user