From a9e9efaca807ecdc42900358566cdf09e0bc3053 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Tue, 11 Apr 2006 16:32:35 +0000 Subject: properly check we get back the data about the bundle --- mdkupdate | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/mdkupdate b/mdkupdate index 866e752f..82423fb8 100755 --- a/mdkupdate +++ b/mdkupdate @@ -161,7 +161,6 @@ if (!$bundle) { $in->exit(1); } my $w = $in->wait_message(N("Please wait"), N("Preparing...")); - my $bundle_info; my %bundle_vars = getVarsFromSh($bundle); rm_rf($bundle); @@ -205,9 +204,10 @@ if (!$bundle) { You need to update to a newer version. You can get a new one from http://start.mandriva.com")); $in->exit(1); } - $res eq 'OK' and $bundle_info = mdkonline::soap_query_bundle($wc, $bundle_vars{BUNDLE}); + my $bundle_info = mdkonline::soap_query_bundle($wc, $bundle_vars{BUNDLE}); + $res = mdkonline::check_server_response($bundle_info); print Data::Dumper->Dump([ $bundle_info ], [ qw(bundle_info) ]); - if ($bundle_info->{status}) { + if ($res eq 'OK') { my @bundles; $w = $in->wait_message(N("Please wait"), N("Preparing...")); my ($mirrors, $bundle) = ($bundle_info->{data}{mirrors}, $bundle_info->{data}{bundle}); -- cgit v1.2.1