\n";
print "\n";
print &choice_input("get_access", $text{'access_get'}, $conf,
"open",$text{'access_open'}, "list",$text{'access_list'},
"closed",$text{'access_closed'});
print &choice_input("index_access", $text{'access_index'}, $conf,
"open",$text{'access_open'}, "list",$text{'access_list'},
"closed",$text{'access_closed'});
print " \n";
print "\n";
print &choice_input("info_access", $text{'access_info'}, $conf,
"open",$text{'access_open'}, "list",$text{'access_list'},
"closed",$text{'access_closed'});
print &choice_input("intro_access", $text{'access_intro'}, $conf,
"open",$text{'access_open'}, "list",$text{'access_list'},
"closed",$text{'access_closed'});
print " \n";
print "\n";
print &choice_input("which_access", $text{'access_which'}, $conf,
"open",$text{'access_open'}, "list",$text{'access_list'},
"closed",$text{'access_closed'});
print &choice_input("who_access", $text{'access_who'}, $conf,
"open",$text{'access_open'}, "list",$text{'access_list'},
"closed",$text{'access_closed'});
print " \n";
$adv = &find_value("advertise", $conf);
$noadv = &find_value("noadvertise", $conf);
print "\n";
print "$text{'access_adv'} | \n";
printf " $text{'access_adv0'} \n",
$adv !~ /\S/ && $noadv !~ /\S/ ? "checked" : "";
printf " $text{'access_adv1'} \n",
$adv =~ /\S/ ? "checked" : "";
printf " $text{'access_adv2'} \n",
$noadv =~ /\S/ ? "checked" : "";
print " | \n";
printf " | \n",
$adv =~ /\S/ ? $adv : $noadv =~ /\S/ ? $noadv : "";
$res = &find_value("restrict_post", $conf);
$ldir = &perl_var_replace(&find_value("listdir", &get_config()),
&get_config());
$reslist = $res eq $in{'name'} || $res eq "$ldir/$in{'name'}";
print " $text{'access_res'} | \n";
printf " $text{'access_res0'}\n",
$res ? "" : "checked";
printf " $text{'access_res1'}\n",
$reslist ? "checked" : "";
printf " $text{'access_res2'}\n",
$res && !$reslist ? "checked" : "";
printf "%s | \n",
$res && !$reslist ? $res : "", &file_chooser_button("res", 0);
print "\n";
print &multi_input("taboo_body", $text{'access_tbody'}, $conf);
print " \n";
print "\n";
print &multi_input("taboo_headers", $text{'access_theader'}, $conf);
print " \n";
print " $text{'access_taboo'} | \n";
print " |