From 279948083b8b133c39d09f850d6de9ba732182d4 Mon Sep 17 00:00:00 2001
From: skodak <skodak>
Date: Tue, 6 Mar 2007 22:33:03 +0000
Subject: [PATCH] MDL-8777  Failing setup_lang_from_browser if lang contains
 dash

---
 lib/moodlelib.php | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lib/moodlelib.php b/lib/moodlelib.php
index 5b653e44fd..1aaeab884c 100644
--- a/lib/moodlelib.php
+++ b/lib/moodlelib.php
@@ -6787,13 +6787,14 @@ function setup_lang_from_browser() {
     }
 
 /// Extract and clean langs from headers
-    $langs = strtolower(clean_param($_SERVER['HTTP_ACCEPT_LANGUAGE'], PARAM_CLEAN)); /// Get String with basic clean
+    $langs = strtolower(clean_param($_SERVER['HTTP_ACCEPT_LANGUAGE'], PARAM_SAFEDIR)); /// Get String with basic clean
+    $langs = str_replace('-', '_', $langs); // we are using underscores
     $langs = explode(',', $langs); /// Convert to array
-    $langs = preg_replace('/([a-z]{2,3}).*/','$1_utf8', $langs); ///Convert to Moodle langs
     $langs = array_unique($langs); /// Avoid duplicates
 
 /// Look for such langs under standard locations
     foreach ($langs as $lang) {
+        $lang = $lang.'_utf8';
         if (file_exists($CFG->dataroot .'/lang/'. $lang) or file_exists($CFG->dirroot .'/lang/'. $lang)) {
             $SESSION->lang = $lang; /// Lang exists, set it in session 
             break; /// We have finished. Go out
-- 
2.39.5