Adapt log message in refresh (#2005)

This commit is contained in:
Clément OUDOT 2019-12-19 18:11:33 +01:00
parent 9ee6cbd60e
commit 3831b81255

View File

@ -9,7 +9,7 @@
# #
package Lemonldap::NG::Portal::Main::Run; package Lemonldap::NG::Portal::Main::Run;
our $VERSION = '2.0.6'; our $VERSION = '2.0.7';
package Lemonldap::NG::Portal::Main; package Lemonldap::NG::Portal::Main;
@ -164,9 +164,10 @@ sub refresh {
my ( $self, $req ) = @_; my ( $self, $req ) = @_;
$req->mustRedirect(1); $req->mustRedirect(1);
my %data = %{ $req->userData }; my %data = %{ $req->userData };
$self->userLogger->notice(
'Refresh request for ' . $data{ $self->conf->{whatToTrace} } );
$req->user( $data{_user} || $data{ $self->conf->{whatToTrace} } ); $req->user( $data{_user} || $data{ $self->conf->{whatToTrace} } );
$req->id( $data{_session_id} ); $req->id( $data{_session_id} );
$self->userLogger->notice( 'Refresh request for ' . $req->user );
foreach ( keys %data ) { foreach ( keys %data ) {
delete $data{$_} unless ( /^_/ or /^(?:startTime)$/ ); delete $data{$_} unless ( /^_/ or /^(?:startTime)$/ );
} }