smf/smfwizard_instance.cgi

   1 #!/usr/local/bin/perl
   2
   3 require './smf-lib.pl';
   4 &ReadParse();
   5 &ui_print_header(undef, $text{'smfwizard_title'}, "");
   6
   7 # wizard-specific info here
   8 &wizard_header($wizard, "smfwizard_instance.cgi",
   9         "$text{'smfwizard_instance_heading'}",
  10         &convert_links_in_text("$text{'smfwizard_instance_description'}"),
  11         "images/smf.gif");
  12 &wizard_input("smfwizard_instance.cgi", "$text{'smfwizard_instance_name'}",
  13         "instance_name", 60, ".+", "$text{'smfwizard_instance_name_error'}");
  14 &wizard_select("smfwizard_instance.cgi", "$text{'smfwizard_instance_enabled'}",
  15         "instance_enabled", \@boolean_values, ".+",
  16         "$text{'smfwizard_instance_enabled_error'}");
  17
  18 &wizard_footer($wizard, "smfwizard_instance.cgi");
  19 # end wizard-specific info
  20
  21 &ui_print_footer("index.cgi", $text{'index'});
  22