For customlists, the data structure is a bit different:
You will find your data under customList.
The email list arsperl-users@arsperl.org is probably the best place to ask (or search) for answers.
Kind regards,
Michiel
sub enum_values ($) {
my $limit = $_[0]->{'limit'};
my @values;
if (ref($limit) eq 'HASH') {
my $h = $limit->{'enumLimits'};
if (ref($h) eq 'HASH') {
if (defined($h->{'regularList'} )){
my $z = $h->{'regularList'};
@values = @$z;
} elsif (defined($h->{'customList'} )){
foreach my $item (@{$h->{'customList'}}){
$values[$item->{'itemNumber'}] = $item->{'itemName'};
}
}
} else {
@values = @$h;
}
} else {
@values = @$limit;
}
return @values;
}
