adsl-client/bootup.cgi

   1 #!/usr/local/bin/perl
   2 # bootup.cgi
   3 # Enable or disable ADSL startup at boot time
   4
   5 require './adsl-client-lib.pl';
   6 &foreign_require("init", "init-lib.pl");
   7 &ReadParse();
   8
   9 if ($in{'boot'}) {
  10         # Enable starting at boot
  11         &init::enable_at_boot("adsl");
  12         &webmin_log("bootup");
  13         }
  14 else {
  15         # Disable starting at boot
  16         &init::disable_at_boot("adsl");
  17         &webmin_log("bootdown");
  18         }
  19 &redirect("");
  20