public static function create($path, $server, $folder, $module, $username = '******', $password = '', $protocol = 'pserver')
{
$root = ":{$protocol}:{$username}";
if (!empty($password)) {
$root .= ":{$password}";
}
$root .= "@{$server}:{$folder}";
return CVS::createroot($path, $root, $module);
}
cpg_delete_msg(URL::admin('&del=' . $_GET['del']), 'Are you sure that you want to delete the ' . get_lang_title($_GET['del']) . ' language pack?');
} elseif (isset($_POST['cvs_lang'])) {
require_once CORE_PATH . 'classes/cvs.php';
if (!preg_match('#^([a-zA-Z0-9_\\-]+)$#', $_POST['cvs_lang'])) {
cpg_error('Invalid title');
}
$path = 'language/' . $_POST['cvs_lang'];
if (!CVS::create($path, 'dragonflycms.org', '/cvs', 'l10n/' . $_POST['cvs_lang'], $_POST['cvs_uname'], $_POST['cvs_pass'])) {
cpg_error('Error creating important CVS files and folders');
} else {
$log = CVS::update($path);
if (!isset($log['error'])) {
if (!isset($log['notes'])) {
cpg_error(get_lang_title($_POST['cvs_lang']) . ' language pack successfully installed', _TB_INFO, URL::admin());
}
$log = nl2br(CVS::formatlog($log));
cpg_error($log, _TB_INFO);
}
cpg_error($log['error']);
}
} elseif (isset($_POST['save_cfg'])) {
foreach ($MAIN_CFG['global'] as $key => $val) {
if (isset($_POST[$key]) && in_array($key, array('multilingual', 'useflags'))) {
$value = $_POST[$key];
if ($value != $val) {
$db->sql_query('UPDATE ' . $prefix . "_config_custom SET cfg_value='" . Fix_Quotes($value) . "' WHERE cfg_name='global' AND cfg_field='{$key}'");
}
}
}
Cache::array_delete('MAIN_CFG');
URL::redirect(URL::admin('&cfg'));
