diff options
Diffstat (limited to 'mdkonline.pm')
-rw-r--r-- | mdkonline.pm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/mdkonline.pm b/mdkonline.pm index 38cc4a15..a055f471 100644 --- a/mdkonline.pm +++ b/mdkonline.pm @@ -92,31 +92,31 @@ sub get_distro_type() { sub soap_create_account { my $data = $s->registerUser(@_)->result; - log::l("creating account $_[0]") + log::l("creating account $_[0]"); $data; } sub soap_authenticate_user { my $data = $s->authenticateUser(@_)->result; - log::l("authenticating account $_[0]") + log::l("authenticating account $_[0]"); $data; } sub soap_register_host { my $data = $s->registerHost(@_)->result; - log::l("registering host $_[3] named $_[4] in country $_[5]") + log::l("registering host $_[3] named $_[4] in country $_[5]"); $data; } sub soap_upload_config { my $data = $s->setHostConfig(@_); - log::l("uploading config") + log::l("uploading config"); $data ? $data->result : undef; } sub soap_query_bundle { my ($wc, $bundle_name) = @_; - log::l("querying the bundle $bundle_name") + log::l("querying the bundle $bundle_name"); my $data = $s->query($wc->{HOST_ID}, $wc->{HOST_KEY}, 'Software::get_bundle', $bundle_name)->result; $data; } |