} elsif ($phash->{format_description}) {
return "<$phash->{format_description}>";
} elsif ($phash->{enum}) {
- return "(" . join(' | ', sort @{$phash->{enum}}) . ")";
+ return "<" . join(' | ', sort @{$phash->{enum}}) . ">";
} elsif ($phash->{pattern}) {
return $phash->{pattern};
} elsif ($type eq 'integer' || $type eq 'number') {
# NOTE: always access values as number (avoid converion to string)
if (defined($phash->{minimum}) && defined($phash->{maximum})) {
- return "$type (" . ($phash->{minimum} + 0) . " - " .
+ return "<$type> (" . ($phash->{minimum} + 0) . " - " .
($phash->{maximum} + 0) . ")";
} elsif (defined($phash->{minimum})) {
- return "$type (" . ($phash->{minimum} + 0) . " - N)";
+ return "<$type> (" . ($phash->{minimum} + 0) . " - N)";
} elsif (defined($phash->{maximum})) {
- return "$type (-N - " . ($phash->{maximum} + 0) . ")";
+ return "<$type> (-N - " . ($phash->{maximum} + 0) . ")";
}
} elsif ($type eq 'string') {
if (my $format = $phash->{format}) {
}
}
- return $type;
+ return "<$type>";
}
1;
if ($fileparams && $type eq 'string') {
foreach my $elem (@$fileparams) {
if ($name eq $elem) {
- $type = 'filepath';
+ $type = '<filepath>';
last;
}
}
$res .= "`$type` " if $type;
if (defined(my $dv = $phash->{default})) {
- $res .= "(default=`$dv`)";
+ $res .= "('default =' `$dv`)";
}
if ($style eq 'config-sub') {