Return to mkdefaults CVS log | Up to [local] / src / usr.bin / sudo |
version 1.2, 2004/09/28 15:10:51 | version 1.3, 2004/11/29 17:40:17 | ||
---|---|---|---|
|
|
||
# Print out def_tuple | # Print out def_tuple | ||
if (@tuple_values) { | if (@tuple_values) { | ||
print HEADER "\nenum def_tupple {\n"; | print HEADER "\nenum def_tupple {\n"; | ||
foreach (@tuple_values) { | for ($i = 0; $i <= $#tuple_values; $i++) { | ||
print HEADER "\t$_,\n"; | printf HEADER "\t%s%s\n", $tuple_values[$i], | ||
$i != $#tuple_values ? "," : ""; | |||
} | } | ||
print HEADER "};\n"; | print HEADER "};\n"; | ||
} | } |