No strict refs (#2436)
This commit is contained in:
parent
b5b311e8b5
commit
7ebca3633c
|
@ -1,6 +1,7 @@
|
||||||
package Lemonldap::NG::Portal::Plugins::CheckUser;
|
package Lemonldap::NG::Portal::Plugins::CheckUser;
|
||||||
|
|
||||||
use strict;
|
use strict;
|
||||||
|
no strict 'refs';
|
||||||
use Mouse;
|
use Mouse;
|
||||||
use Lemonldap::NG::Portal::Main::Constants qw(
|
use Lemonldap::NG::Portal::Main::Constants qw(
|
||||||
PE_NOTOKEN
|
PE_NOTOKEN
|
||||||
|
@ -535,7 +536,6 @@ sub _headers {
|
||||||
if ( $self->displayNormalizedHeadersRule->( $req, $savedUserData ) ) {
|
if ( $self->displayNormalizedHeadersRule->( $req, $savedUserData ) ) {
|
||||||
$self->logger->debug("Normalize headers...");
|
$self->logger->debug("Normalize headers...");
|
||||||
@$headers = map {
|
@$headers = map {
|
||||||
no strict 'refs';
|
|
||||||
{
|
{
|
||||||
key => &{ $self->p->HANDLER . '::cgiName' }( $_->{key} ),
|
key => &{ $self->p->HANDLER . '::cgiName' }( $_->{key} ),
|
||||||
value => $_->{value}
|
value => $_->{value}
|
||||||
|
|
Loading…
Reference in New Issue
Block a user