From: Marius Gavrilescu <marius@ieval.ro>
Date: Sun, 20 Sep 2015 16:39:18 +0000 (+0300)
Subject: Fix perform_server_action
X-Git-Tag: 0.001001~3
X-Git-Url: http://git.ieval.ro/?p=webservice-scaleway.git;a=commitdiff_plain;h=b292204e62d5df6442438b08c0b996ac1e673d0a

Fix perform_server_action
---

diff --git a/lib/WebService/Scaleway.pm b/lib/WebService/Scaleway.pm
index d4ea8b6..9c327e6 100644
--- a/lib/WebService/Scaleway.pm
+++ b/lib/WebService/Scaleway.pm
@@ -155,7 +155,7 @@ sub server_actions {
 BEGIN { *list_server_actions = \&server_actions }
 
 sub perform_server_action {
-	my $content = encode_json { action => $_[1] };
+	my $content = encode_json { action => $_[2] };
 	_tores shift->_post(_api "/servers/$_[0]/action", { content => $content })->{task};
 }