summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xcontrib/bz_webservice_demo.pl8
1 files changed, 4 insertions, 4 deletions
diff --git a/contrib/bz_webservice_demo.pl b/contrib/bz_webservice_demo.pl
index 19bbcc59e..aa92d1dd9 100755
--- a/contrib/bz_webservice_demo.pl
+++ b/contrib/bz_webservice_demo.pl
@@ -212,12 +212,12 @@ The call will return a C<Bugzilla::Bug> object.
=cut
if ($bug_id) {
- $soapresult = $proxy->call('Bug.get_bug', { ids => [$bug_id] });
+ $soapresult = $proxy->call('Bug.get_bugs', { ids => [$bug_id] });
_die_on_fault($soapresult);
$result = $soapresult->result;
-
- foreach (keys(%$result)) {
- print "$_: $$result{$_}\n";
+ my $bug = $result->{bugs}->[0];
+ foreach (keys(%$bug)) {
+ print "$_: $$bug{$_}\n";
}
}