\n";
print " $text{'edit_name'} | \n";
if ($in{'new'}) {
print " | \n";
print "\n";
}
else {
print "$prn{'name'} | \n";
print "\n";
}
print "$text{'edit_acc'} | \n";
printf " $text{'yes'}\n",
$prn{'accepting'} ? "checked" : "";
if (&printer_support('why')) {
printf " %s\n",
$prn{'accepting'} ? "" : "checked", $text{'edit_why'};
printf " | \n",
$prn{'accepting_why'};
}
else {
printf " $text{'no'}\n",
$prn{'accepting'} ? "" : "checked";
}
if (&printer_support('desc')) {
print " $text{'edit_desc'} | \n";
print " | \n";
}
else { print " | \n"; }
print "$text{'edit_ena'} | \n";
printf " $text{'yes'}\n",
$prn{'enabled'} ? "checked" : "";
if (&printer_support('why')) {
printf " %s\n",
$prn{'enabled'} ? "" : "checked", $text{'edit_why'};
printf " | \n",
$prn{'enabled_why'};
}
else {
printf " $text{'no'}\n",
$prn{'enabled'} ? "" : "checked";
}
if (&printer_support('allow')) {
print " $text{'edit_acl'} | \n";
print "\n";
printf " %s \n",
$prn{'allow_all'} ? "checked" : "", $text{'edit_allow'};
printf " %s \n",
$prn{'deny_all'} ? "checked" : "", $text{'edit_deny'};
printf " %s \n",
$prn{'allow'} ? "checked" : "", $text{'edit_allowu'};
printf " %s\n",
$prn{'deny'} ? "checked" : "", $text{'edit_denyu'};
print " | \n";
print " | \n";
print "",&user_chooser_button("users",1)," | \n";
print "
| \n";
}
if (&printer_support('banner')) {
print " $text{'edit_banner'} | ",
"\n";
printf " $text{'yes'}\n",
$prn{'banner'} ? "checked" : "";
printf " %s | \n",
$prn{'banner'} ? "" : "checked", $text{'edit_opt'};
}
else { print " \n"; }
if (&printer_support('default')) {
print "$text{'edit_default'} | \n";
if (!$prn{'default'}) {
printf " $text{'yes'}\n", $prn{'default'} ? "checked" : "";
printf " $text{'no'} | \n", $prn{'default'} ? "" : "checked";
}
else {
print "$text{'edit_already'} \n";
}
}
elsif (&printer_support('msize')) {
print "$text{'edit_max'} | \n";
printf " %s\n",
defined($prn{'msize'}) ? "" : "checked", $text{'default'};
printf " %s\n",
$prn{'msize'} eq '0' ? "checked" : "", $text{'edit_unlimited'};
printf "\n",
$prn{'msize'} ? "checked" : "";
printf " %s | \n",
$prn{'msize'} ? $prn{'msize'} : "", $text{'blocks'};
}
else { print "\n"; }
if (&printer_support('ctype')) {
@ctype = @{$prn{'ctype'}};
print " | $text{'edit_dacc'} | \n";
printf " %s \n",
&indexof("simple", @ctype) < 0 ? "" : "checked",
$text{'edit_dtext'};
printf " %s \n",
&indexof("postscript", @ctype) < 0 ? "" : "checked",
$text{'edit_dpost'};
@ctypeo = grep { !/^(simple|postscript)$/ } @ctype;
printf " %s\n",
@ctypeo ? "checked" : "", $text{'edit_dother'};
printf "\n",
join(' ', @ctypeo);
print " | \n";
}
if (&printer_support('alias')) {
@alias = @{$prn{'alias'}};
print " $text{'edit_alt'} | \n";
printf " | \n",
join(' ', @alias);
}
print " |