From ea551610f57593a90ea90bbd4366958bc3111213 Mon Sep 17 00:00:00 2001
From: Xavier Guimard <x.guimard@free.fr>
Date: Sat, 23 Jun 2018 07:23:16 +0200
Subject: [PATCH] Avoid failure with SOAP sessions (#1431)

---
 lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Main/Display.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Main/Display.pm b/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Main/Display.pm
index 8dd4660ee..869ab454b 100644
--- a/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Main/Display.pm
+++ b/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Main/Display.pm
@@ -485,7 +485,9 @@ sub mkSessionArray {
 sub mkOidcConsent {
     my ( $self, $session ) = @_;
 
-    if ( defined( $self->conf->{oidcRPMetaDataOptions} ) ) {
+    if ( defined( $self->conf->{oidcRPMetaDataOptions} )
+        and ref( $self->conf->{oidcRPMetaDataOptions} ) )
+    {
         foreach my $oidc ( keys %{ $self->conf->{oidcRPMetaDataOptions} } ) {
             $self->conf->{oidcRPMetaDataOptions}->{$oidc}
               ->{oidcRPMetaDataOptionsDisplayName} ||= $oidc;