if (!array_key_exists($clang_id, $REX['CLANG'])) {
            $info = $I18N->msg('clang_created');
            rex_addCLang($clang_id, $clang_name);
            unset($clang_id);
            $func = '';
        } else {
            $warning = $I18N->msg('id_exists');
            $func = 'addclang';
        }
    } else {
        $warning = $I18N->msg('enter_name');
        $func = 'addclang';
    }
} elseif (!empty($edit_clang_save)) {
    if (array_key_exists($clang_id, $REX['CLANG'])) {
        rex_editCLang($clang_id, $clang_name);
        $info = $I18N->msg('clang_edited');
        $func = '';
        unset($clang_id);
    }
}
// seltype
$sel = new rex_select();
$sel->setName('clang_id');
$sel->setId('clang_id');
$sel->setSize(1);
foreach (array_diff(range(0, 14), array_keys($REX['CLANG'])) as $clang) {
    $sel->addOption($clang, $clang);
}
if ($info != '') {
    echo rex_info($info);
        if (!array_key_exists($clang_id, $REX['CLANG'])) {
            $info = $I18N->msg('clang_created');
            rex_addCLang($clang_id, stripslashes($clang_name));
            unset($clang_id);
            $func = '';
        } else {
            $warning = $I18N->msg('id_exists');
            $func = 'addclang';
        }
    } else {
        $warning = $I18N->msg('enter_name');
        $func = 'addclang';
    }
} elseif ($edit_clang_save) {
    if (array_key_exists($clang_id, $REX['CLANG'])) {
        rex_editCLang($clang_id, stripslashes($clang_name));
        $info = $I18N->msg('clang_edited');
        $func = '';
        unset($clang_id);
    }
}
// seltype
$sel = new rex_select();
$sel->setName('clang_id');
$sel->setStyle('class="rex-form-select"');
$sel->setId('rex-form-clang-id');
$sel->setSize(1);
$remaingClangs = array_diff(range(0, $REX['MAXCLANGS'] - 1), array_keys($REX['CLANG']));
foreach ($remaingClangs as $clang) {
    $sel->addOption($clang, $clang);
}