summaryrefslogtreecommitdiffstats
path: root/mdkonline.pm
diff options
context:
space:
mode:
Diffstat (limited to 'mdkonline.pm')
-rw-r--r--mdkonline.pm10
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;
}