Merge remote branch 'smcv/ready/sslcookie-auto'
commit
3697a684df
|
@ -12,7 +12,7 @@ use Encode;
|
||||||
sub printheader ($) {
|
sub printheader ($) {
|
||||||
my $session=shift;
|
my $session=shift;
|
||||||
|
|
||||||
if ($config{sslcookie}) {
|
if ($ENV{HTTPS} || $config{sslcookie}) {
|
||||||
print $session->header(-charset => 'utf-8',
|
print $session->header(-charset => 'utf-8',
|
||||||
-cookie => $session->cookie(-httponly => 1, -secure => 1));
|
-cookie => $session->cookie(-httponly => 1, -secure => 1));
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue