summaryrefslogtreecommitdiffstats
path: root/contrib
diff options
context:
space:
mode:
authorlpsolit%gmail.com <>2007-01-06 23:20:16 +0100
committerlpsolit%gmail.com <>2007-01-06 23:20:16 +0100
commit685d0e4e57f0bf6bef927fe3a1abb01331ca69f4 (patch)
tree162d9251ab74fb3d5ee27edcfc0a825ae67f4247 /contrib
parentf831ad08bc165c3b6ca609c1798bab7285bdbbd7 (diff)
downloadbugzilla-685d0e4e57f0bf6bef927fe3a1abb01331ca69f4.tar.gz
bugzilla-685d0e4e57f0bf6bef927fe3a1abb01331ca69f4.tar.xz
Bug 365593: bz_webservices_demo.pl does not match the API as defined in the Webservices code - Patch by Mads Bondo Dydensborg <mbd@dbc.dk> r=mkanat a=myk
Diffstat (limited to 'contrib')
-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";
}
}