Commit 455ed3b4 authored by Yadd's avatar Yadd
Browse files

Avoid Perl warning

parent a280a8f9
......@@ -1628,7 +1628,7 @@ sub issuerForAuthUser {
# log that a SAML authn response is build
my $user = $self->{sessionInfo}->{ $self->{whatToTrace} };
my $nameIDLog;
foreach my $format qw(persistent transient) {
foreach my $format (qw(persistent transient)) {
if ( $login->nameIdentifier->Format eq
$self->getNameIDFormat($format) )
{
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment