From f8264d7b436016b08d447499e87b23d4108855b8 Mon Sep 17 00:00:00 2001
From: Nicolas Boisselier <nicolas.boisselier@gmail.com>
Date: Sat, 4 Feb 2017 21:04:06 +0000
Subject: [PATCH] bin/ovh-api

---
 bin/ovh-api | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/bin/ovh-api b/bin/ovh-api
index ad139ea3..004cef2e 100755
--- a/bin/ovh-api
+++ b/bin/ovh-api
@@ -34,7 +34,8 @@ my %Opt = (
 get_options(\%Opt);
 # Auth
 if ($_ = $Opt{activate}) {
-  my $Api = OvhApi->new(type => OvhApi::OVH_API_EU, applicationKey => $_);
+  my @keys = /:/ ? split(':',$_) : ($_,'');
+  my $Api = OvhApi->new(type => OvhApi::OVH_API_EU, applicationKey => $keys[0], applicationSecret => $keys[1]);
   my $Answer = $Api->requestCredentials(accessRules => [ {
     method => 'ALL', path => '/*',
 # NB 04.02.17     method => 'GET', path => '/*',
@@ -71,6 +72,7 @@ if (@ARGV and $ARGV[0] =~ /^(\w+):(\w+):(\w+)$/) {
 
 } elsif ($ENV{$NAME.'_KEY'}) {
   @KEY = split(':',$ENV{$NAME.'_KEY'});
+
 } elsif (-e $config) {
   open(CONFIG,"$config") or die "$NAME: can't read $config";
   @KEY = split(":",chomp($_=<CONFIG>) && $_);
-- 
2.47.3