Fix bug field conversion in webservice, fix printing it out in demo script
parent
3cd8adb954
commit
62f7651872
|
@ -887,9 +887,12 @@ sub _bug_to_hash {
|
|||
my @values = map { $self->type('string', $_->name) } @{ $bug->get_object($name) };
|
||||
$item{$name} = \@values;
|
||||
}
|
||||
else {
|
||||
elsif ($field->type == FIELD_TYPE_SINGLE_SELECT) {
|
||||
$item{$name} = $self->type('string', $bug->$name && $bug->get_object($name)->name);
|
||||
}
|
||||
else {
|
||||
$item{$name} = $self->type('string', $bug->$name);
|
||||
}
|
||||
}
|
||||
|
||||
# Timetracking fields are only sent if the user can see them.
|
||||
|
|
|
@ -276,11 +276,11 @@ if ($bug_id) {
|
|||
my $value = $bug->{$field};
|
||||
if (ref($value) eq 'HASH') {
|
||||
foreach (keys %$value) {
|
||||
print "$_: " . $value->{$_} . "\n";
|
||||
print "$_: " . (ref($value->{$_}) eq 'ARRAY' ? join(', ', @{$value->{$_}}) : $value->{$_}) . "\n";
|
||||
}
|
||||
}
|
||||
else {
|
||||
print "$field: $value\n";
|
||||
print "$field: " . (ref($value) eq 'ARRAY' ? join(', ', @$value) : $value) . "\n";
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
Loading…
Reference in New Issue