function lang__select_lang($varname, $selected = "", $type = "all")
{
global $lang;
switch ($type) {
case "public":
$sel_langs = lang__get_public_langs();
break;
case "part":
$sel_langs = lang__get_part_langs();
break;
default:
$sel_langs = get_languages();
}
if (!$selected) {
$selected = lang('lang');
}
$lang_names = lang__get_language_names();
$out = '';
$out .= '<SELECT name="' . $varname . '">';
foreach ($sel_langs as $olang) {
$out .= '<OPTION value="' . $olang . '"';
if ($olang == $selected) {
$out .= ' SELECTED';
}
$out .= '>' . $lang_names[$olang] . '</OPTION>';
}
$out .= '</SELECT>';
return $out;
}
}
if ($proceed) {
// load experiment data into array experiment
$experiment = orsee_db_load_array("experiments", $experiment_id, "experiment_id");
if (!check_allow('experiment_restriction_override')) {
check_experiment_allowed($experiment, "admin/experiment_show.php?experiment_id=" . $experiment_id);
}
}
if ($proceed) {
$alllangs = get_languages();
if (isset($_REQUEST['replang']) && in_array($_REQUEST['replang'], $alllangs) && $_REQUEST['replang'] != lang('lang')) {
$replang = $_REQUEST['replang'];
} else {
$replang = lang('lang');
}
$lang_names = lang__get_language_names();
$switchlang_text = '';
foreach ($alllangs as $thislang) {
if ($thislang != $replang) {
$switchlang_text .= '<A HREF="' . thisdoc() . '?experiment_id=' . $experiment_id . '&replang=' . $thislang . '"><span class="languageicon langicon-' . $thislang . '">';
if (isset($lang_names[$thislang]) && $lang_names[$thislang]) {
$switchlang_text .= $lang_names[$thislang];
} else {
$switchlang_text .= $thislang;
}
$switchlang_text .= '</span></A> ';
}
}
if ($switchlang_text) {
$switchlang_text = '<P align="right">' . lang('this_report_in_language') . ' ' . $switchlang_text . '</P>';
}
