Hide some warnings (#1135)

This commit is contained in:
Xavier Guimard 2017-01-17 20:38:22 +00:00
parent 6e9a24e9c4
commit 4aea2760b6

View File

@ -263,8 +263,9 @@ sub getApacheSession {
}
);
if ( $as->error ) {
$self->lmLog( $as->error, 'info' );
if ( my $err = $as->error ) {
$self->lmLog( $err,
( $err =~ /Object does not exist/ ? 'notice' : 'error' ) );
return;
}
@ -619,7 +620,7 @@ sub cookie {
$f =~ s/_/-/g;
push @res, "$f=$h{$_}" if ( $h{$_} );
}
push @res, 'secure' if($h{secure});
push @res, 'secure' if ( $h{secure} );
return join( '; ', @res );
}