Files
webmin/lpadmin/start.cgi
2007-04-12 20:24:50 +00:00

20 lines
383 B
Perl
Executable File

#!/usr/local/bin/perl
# start.cgi
# Start the print scheduler
require './lpadmin-lib.pl';
&ReadParse();
$access{'stop'} == 1 || &error($text{'start_ecannot'});
&error_setup($text{'start_err'});
if ($config{'start_cmd'}) {
$out = &backquote_logged("($config{'start_cmd'}) 2>&1");
&error($out) if ($?);
sleep(3);
}
else {
&start_sched();
}
&webmin_log("start");
&redirect("");