Add vhost in forbidden log (closes: #1144)

This commit is contained in:
Xavier Guimard 2017-01-30 19:29:12 +00:00
parent e285c1c8d6
commit edba7d11d4

View File

@ -284,8 +284,9 @@ sub grant {
# @param $uri URI
# @return Constant $class->FORBIDDEN
sub forbidden {
my ( $class, $session ) = @_;
my ( $class, $session, $vhost ) = @_;
my $uri = $class->unparsed_uri;
$vhost ||= $class->resolveAlias;
if ( $session->{_logout} ) {
$class->updateStatus( 'LOGOUT',
@ -299,7 +300,7 @@ sub forbidden {
$class->lmLog(
"User "
. $session->{ $class->tsv->{whatToTrace} }
. " was forbidden to access to $uri",
. " was forbidden to access to $vhost$uri",
"notice"
);
$class->updateStatus( 'REJECT', $session->{ $class->tsv->{whatToTrace} } );