Skip to content
This repository
tree: bcdf03d66a
Fetching contributors…

Octocat-spinner-32-eaf2f5

Cannot retrieve contributors at this time

executable file 14 lines (10 sloc) 0.3 kb
1 2 3 4 5 6 7 8 9 10 11 12 13
#!/usr/local/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'}");

Something went wrong with that request. Please try again.