Commit c6e30e48 authored by Dietmar Maurer's avatar Dietmar Maurer

fix language cookie parser

parent 4c0405df
...@@ -32,7 +32,7 @@ my $token = 'null'; ...@@ -32,7 +32,7 @@ my $token = 'null';
if (my $cookie = $r->headers_in->{Cookie}) { if (my $cookie = $r->headers_in->{Cookie}) {
if (my $newlang = ($cookie =~ /(?:^|\s)PVELangCookie=([^;]*)/)[0]) { if (my $newlang = ($cookie =~ /(?:^|\s)PVELangCookie=([^;]*)/)[0]) {
if ($newlang =~ m/^[a-f]{2,3}(_A-F{2,3})?$/) { if ($newlang =~ m/^[a-z]{2,3}(_A-Z{2,3})?$/) {
$lang = $newlang; $lang = $newlang;
} }
} }
......
Markdown is supported
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