my @custom_select =
Bugzilla->get_fields({ type => FIELD_TYPE_SINGLE_SELECT });
+ # We only want field names.
+ @custom_select = map {$_->name} @custom_select;
my $values;
if (grep($_ eq $field, GLOBAL_SELECT_FIELDS, @custom_select)) {
my $bug_id;
my $product_name;
my $create_file_name;
+my $legal_field_values;
GetOptions('help|h|?' => \$help,
'uri=s' => \$Bugzilla_uri,
'rememberlogin!' => \$Bugzilla_remember,
'bug_id:s' => \$bug_id,
'product_name:s' => \$product_name,
- 'create:s' => \$create_file_name
+ 'create:s' => \$create_file_name,
+ 'field:s' => \$legal_field_values
) or pod2usage({'-verbose' => 0, '-exitval' => 1});
=head1 OPTIONS
}
+=head2 Getting Legal Field Values
+
+Call C<Bug.legal_values> with the name of the field (including custom
+select fields). The call will return a reference to an array with the
+list of legal values for this field.
+
+=cut
+
+if ($legal_field_values) {
+ $soapresult = $proxy->call('Bug.legal_values', {field => $legal_field_values} );
+ _die_on_fault($soapresult);
+ $result = $soapresult->result;
+
+ print join("\n", @{$result->{values}}) . "\n";
+}
=head1 NOTES