From ad165dafb7b3fb28d25bb481ef232d467138a1f4 Mon Sep 17 00:00:00 2001
From: "lpsolit%gmail.com"
 <lpsolit%gmail.com@18797224-902f-48f8-a5cc-f745e15eee43>
Date: Sat, 6 Jan 2007 14:20:16 +0000
Subject: [PATCH] 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

git-svn-id: svn://10.0.0.236/trunk@217891 18797224-902f-48f8-a5cc-f745e15eee43
---
 mozilla/webtools/bugzilla/contrib/bz_webservice_demo.pl | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/mozilla/webtools/bugzilla/contrib/bz_webservice_demo.pl b/mozilla/webtools/bugzilla/contrib/bz_webservice_demo.pl
index 19bbcc59e7a..aa92d1dd992 100755
--- a/mozilla/webtools/bugzilla/contrib/bz_webservice_demo.pl
+++ b/mozilla/webtools/bugzilla/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";
     }
 }