openslp/save_dacfg.cgi

   1 #!/usr/local/bin/perl
   2 #
   3 # An OpenSLP webmin module
   4 # by Monty Charlton <monty@caldera.com>,
   5 #
   6 # Copyright (c) 2000 Caldera Systems
   7 #
   8 # Permission to use, copy, modify, and distribute this software and its
   9 # documentation under the terms of the GNU General Public License is hereby
  10 # granted. No representations are made about the suitability of this software
  11 # for any purpose. It is provided "as is" without express or implied warranty.
  12 # See the GNU General Public License for more details.
  13 #
  14
  15 require './slp-lib.pl';
  16 &ReadParse();
  17
  18 # Process Boolean Items
  19 if ($in{'isDA'}) {
  20         &enable_single_val_line('true','isDA');
  21         }
  22 else {
  23         &disable_line('isDA');
  24 }
  25
  26 &restart();
  27 &redirect("");
  28