mirror of
https://github.com/webmin/webmin.git
synced 2025-08-05 18:36:54 +00:00
18 lines
362 B
Perl
Executable File
18 lines
362 B
Perl
Executable File
#!/usr/local/bin/perl
|
|
# Enable or disable atd at boot time
|
|
|
|
require './at-lib.pl';
|
|
&ReadParse();
|
|
&foreign_require("init");
|
|
$access{'stop'} || &error($text{'bootup_ecannot'});
|
|
$init = &get_init_name();
|
|
if ($in{'boot'}) {
|
|
&init::enable_at_boot($init);
|
|
}
|
|
else {
|
|
&init::disable_at_boot($init);
|
|
}
|
|
&webmin_log($in{'boot'} ? "bootup" : "bootdown");
|
|
&redirect("");
|
|
|