Commit 6de3eb81 authored by IKEDA Soji's avatar IKEDA Soji
Browse files

typo.

parent 60c73d7b
......@@ -323,7 +323,7 @@ sub get_cookie_domain {
my $http_host = Sympa::WWW::Tools::get_http_host() || '';
$http_host =~ s/:\d+\z//; # Suppress port.
my $dotdom = lc $cookie_domain;
$dotdom =~ s/\A(?!.)/./;
$dotdom =~ s/\A(?![.])/./;
unless (substr($http_host, -length($dotdom)) eq $dotdom
or ".$http_host" eq $dotdom
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment