diff options
author | Daouda Lo <daouda@mandriva.com> | 2006-02-23 10:24:00 +0000 |
---|---|---|
committer | Daouda Lo <daouda@mandriva.com> | 2006-02-23 10:24:00 +0000 |
commit | ae2f39a795e9ae471aa4d375928c4f40619857f8 (patch) | |
tree | d9a93b9f45911c99da0fa9b80a93863ccf1a1db3 | |
parent | bcf3aba40cf21966488626311b9274a3e18924ae (diff) | |
download | mgaonline-ae2f39a795e9ae471aa4d375928c4f40619857f8.tar mgaonline-ae2f39a795e9ae471aa4d375928c4f40619857f8.tar.gz mgaonline-ae2f39a795e9ae471aa4d375928c4f40619857f8.tar.bz2 mgaonline-ae2f39a795e9ae471aa4d375928c4f40619857f8.tar.xz mgaonline-ae2f39a795e9ae471aa4d375928c4f40619857f8.zip |
- add getUpdateHost func
-rw-r--r-- | mdkonline.pm | 17 |
1 files changed, 11 insertions, 6 deletions
diff --git a/mdkonline.pm b/mdkonline.pm index 575ab0c7..55b19310 100644 --- a/mdkonline.pm +++ b/mdkonline.pm @@ -260,18 +260,23 @@ sub rpm_ver_cmp { } sub soap_recover_service { - my $auth = $s->recoverHostFromV2(@_)->result(); - $auth; + my $data = $s->recoverHostFromV2(@_)->result(); + $data; } sub soap_get_task { - my $auth = $s->getTask(@_)->result(); - $auth; + my $data = $s->getTask(@_)->result(); + $data; } sub soap_return_task_result { - my $auth = $s->setTaskResult(@_)->result(); - $auth; + my $data = $s->setTaskResult(@_)->result(); + $data; +} + +sub soap_get_updates_for_host { + my $data = $s->getUpdatesForHost(@_)->result(); + $data } sub mv_files { |