fix language cookie parser

c6e30e48 · Dietmar Maurer · 4c0405df · c6e30e48
Commit c6e30e48 authored Dec 07, 2011 by Dietmar Maurer
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

index.pl www/manager/index.pl +1 -1

No files found.
--- a/www/manager/index.pl
+++ b/www/manager/index.pl
@@ -32,7 +32,7 @@ my $token = 'null';
 if (my $cookie = $r->headers_in->{Cookie}) {

    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;
 	}
    }