#!/usr/pkg/bin/perl
# switch_skill.cgi
# Change the skill level of the current user

BEGIN { push(@INC, ".."); };
use WebminCore;

&init_config();
&ReadParse();
$gconfig{'skill_'.$base_remote_user} = $in{'skill'};
&write_file("$config_directory/config", \%gconfig);
&redirect("/?cat=$in{'cat'}");

