dani/lemonldap-ng
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Avoid some warnings

Browse Source
This commit is contained in:
Xavier Guimard 2017-07-11 11:50:21 +00:00
parent 482a6fb59d
commit fefd723226
2 changed files with 12 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Issuer/OpenIDConnect.pm
View File

@ -469,8 +469,7 @@ qq'<h3 trspan="oidcConsent,$display_name">The application $display_name would li
{ {
my $message = $scope_messages->{$requested_scope} my $message = $scope_messages->{$requested_scope}
|| 'anotherInformation'; || 'anotherInformation';
$req->info( $req->info(qq'<li trspan="$message">$message</li>');
qq'<li trspan="$message">$message</li>');
} }
$req->info('</ul></div>'); $req->info('</ul></div>');
$req->datas->{activeTimer} = 0; $req->datas->{activeTimer} = 0;
@ -799,16 +798,18 @@ qq'<h3 trspan="oidcConsent,$display_name">The application $display_name would li
my $redirect_uri_allowed = 0; my $redirect_uri_allowed = 0;
foreach ( keys %{ $self->conf->{oidcRPMetaDataOptions} } ) { foreach ( keys %{ $self->conf->{oidcRPMetaDataOptions} } ) {
my $logout_rp = $_; my $logout_rp = $_;
my $redirect_uris = if ( my $redirect_uris =
$self->conf->{oidcRPMetaDataOptions}->{$logout_rp} $self->conf->{oidcRPMetaDataOptions}->{$logout_rp}
->{oidcRPMetaDataOptionsPostLogoutRedirectUris}; ->{oidcRPMetaDataOptionsPostLogoutRedirectUris} )
{
foreach ( split( /\s+/, $redirect_uris ) ) { foreach ( split( /\s+/, $redirect_uris ) ) {
if ( $post_logout_redirect_uri eq $_ ) { if ( $post_logout_redirect_uri eq $_ ) {
$self->logger->debug( $self->logger->debug(
"$post_logout_redirect_uri is an allowed logout redirect URI for RP $logout_rp" "$post_logout_redirect_uri is an allowed logout redirect URI for RP $logout_rp"
); );
$redirect_uri_allowed = 1; $redirect_uri_allowed = 1;
}
} }
} }
} }

1
lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Main/Run.pm
View File

@ -577,6 +577,7 @@ sub setHiddenFormValue {
# Default values # Default values
$prefix = "lmhidden_" unless defined $prefix; $prefix = "lmhidden_" unless defined $prefix;
$base64 = 1 unless defined $base64; $base64 = 1 unless defined $base64;
$val = '' unless defined $val;
# Store value # Store value
if ( $val or !( $val & ~$val ) ) { if ( $val or !( $val & ~$val ) ) {