+
+// Prepare an array of available languages.
+$lang_files = I18n::getLangFileList();
+foreach ($lang_files as $lfile) {
+ $content = file(RESOURCE_DIR."/".$lfile);
+ $lname = '';
+ foreach ($content as $line) {
+ if (strstr($line, 'i18n_language')) {
+ $a = explode('=', $line);
+ $lname = trim(str_replace(';','',str_replace("'","",$a[1])));
+ break;
+ }
+ }
+ unset($content);
+ $longname_lang[] = array('id'=>I18n::getLangFromFilename($lfile),'name'=>$lname);
+}
+$longname_lang = mu_sort($longname_lang, 'name');
+$form->addInput(array('type'=>'combobox','name'=>'lang','style'=>'width: 200px','data'=>$longname_lang,'datakeys'=>array('id','name'),'value'=>$cl_lang));
+