From 6346748fec6b3a645656bfffd55b1aab4a3c1c16 Mon Sep 17 00:00:00 2001
From: stronk7 <stronk7>
Date: Mon, 10 Apr 2006 22:53:53 +0000
Subject: [PATCH] Strip the "_utf8" suffix from language names in list of
 languages. (http://moodle.org/bugs/bug.php?op=show&bugid=4924)

---
 lib/moodlelib.php | 18 ++++++++++++++----
 1 file changed, 14 insertions(+), 4 deletions(-)

diff --git a/lib/moodlelib.php b/lib/moodlelib.php
index fc0d8802fc..709119fea2 100644
--- a/lib/moodlelib.php
+++ b/lib/moodlelib.php
@@ -4935,6 +4935,11 @@ function get_list_of_languages() {
             if (strstr('_local',$lang)!==false) {
                 continue;
             }
+            if (substr($lang, -5) == '_utf8') {   //Remove the _utf8 suffix from the lang to show
+                $shortlang = substr($lang, 0, -5);
+            } else {
+                $shortlang = $lang;
+            }
         /// Search under dirroot/lang
         /// If $CFG->unicodedb = false, ignore new lang packs
             if (empty($CFG->unicodedb)) {
@@ -4945,7 +4950,7 @@ function get_list_of_languages() {
             if (file_exists($CFG->dirroot .'/lang/'. $lang .'/'. $filetocheck)) {
                 include($CFG->dirroot .'/lang/'. $lang .'/'. $filetocheck);
                 if (!empty($string['thislanguage'])) {
-                    $languages[$lang] = $string['thislanguage'].' ('. $lang .')';
+                    $languages[$lang] = $string['thislanguage'].' ('. $shortlang .')';
                 }
                 unset($string);
             }
@@ -4959,7 +4964,7 @@ function get_list_of_languages() {
             if (file_exists($CFG->dataroot .'/lang/'. $lang .'/'. $filetocheck)) {
                 include($CFG->dataroot .'/lang/'. $lang .'/'. $filetocheck);
                 if (!empty($string['thislanguage'])) {
-                    $languages[$lang] = $string['thislanguage'].' ('. $lang .')';
+                    $languages[$lang] = $string['thislanguage'].' ('. $shortlang .')';
                 }
                 unset($string);
             }
@@ -4978,6 +4983,11 @@ function get_list_of_languages() {
             if (strstr('_local',$lang)!==false) {
                 continue;
             }
+            if (substr($lang, -5) == '_utf8') {   //Remove the _utf8 suffix from the lang to show
+                $shortlang = substr($lang, 0, -5);
+            } else {
+                $shortlang = $lang;
+            }
         /// Search under moodledata/lang
         /// If $CFG->unicodedb = false, ignore new lang packs
             if (empty($CFG->unicodedb)) {
@@ -4988,7 +4998,7 @@ function get_list_of_languages() {
             if (file_exists($CFG->dataroot .'/lang/'. $lang .'/'. $filetocheck)) {
                 include($CFG->dataroot .'/lang/'. $lang .'/'. $filetocheck);
                 if (!empty($string['thislanguage'])) {
-                    $languages[$lang] = $string['thislanguage'] .' ('. $lang .')';
+                    $languages[$lang] = $string['thislanguage'] .' ('. $shortlang .')';
                 }
                 unset($string);
             }
@@ -5002,7 +5012,7 @@ function get_list_of_languages() {
             if (file_exists($CFG->dirroot .'/lang/'. $lang .'/'. $filetocheck)) {
                 include($CFG->dirroot .'/lang/'. $lang .'/'. $filetocheck);
                 if (!empty($string['thislanguage'])) {
-                    $languages[$lang] = $string['thislanguage'] .' ('. $lang .')';
+                    $languages[$lang] = $string['thislanguage'] .' ('. $shortlang .')';
                 }
                 unset($string);
             }
-- 
2.39.5