Compilation error in IssuerDBOpenIDConnect.pm
[error] Lemonldap::NG::Portal::IssuerDBOpenIDConnect load error: Global symbol "$client_id" requires explicit package name at /usr/share/perl5/vendor_perl/Lemonldap/NG/Portal/IssuerDBOpenIDConnect.pm line 160.
FIX:
--- Lemonldap/NG/Portal/IssuerDBOpenIDConnect.pm.old 2017-03-15 19:26:59.156386845 +0000
+++ Lemonldap/NG/Portal/IssuerDBOpenIDConnect.pm 2017-03-15 19:27:05.877387247 +0000
@@ -156,7 +156,8 @@
}
# Get RP
- if ( $oidc_request->{'client_id'} ) {
+ my $client_id = $oidc_request->{'client_id'};
+ if ( defined $client_id ) {
my $rp = $self->getRP($client_id);
$ENV{"llng_oidc_rp"} = $rp if $rp;
}