nis/edit_server.cgi

   1 #!/usr/local/bin/perl
   2 # edit_server.cgi
   3 # Display NIS server settings
   4
   5 require './nis-lib.pl';
   6 &ui_print_header(undef, $text{'server_title'}, "");
   7
   8 if (!(&get_nis_support() & 2)) {
   9         print "<p>$text{'server_enis'}<p>\n";
  10         }
  11 else {
  12         print "<form action=save_server.cgi method=post>\n";
  13         print "<table border width=100%>\n";
  14         print "<tr $tb> <td><b>$text{'server_header'}</b></td> </tr>\n";
  15         print "<tr $cb> <td><table width=100%>\n";
  16
  17         &show_server_config();
  18
  19         print "</table></td></tr></table>\n";
  20         print "<input type=submit value='$text{'server_ok'}'></form>\n";
  21         }
  22
  23 &ui_print_footer("", $text{'index_return'});
  24