From 643a8f1cfdf9845254f1eb397dd87bc5a92367b2 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?C=C3=B4me=20Bernigaud?= Date: Thu, 13 Aug 2015 14:49:43 +0200 Subject: [PATCH] Fixes exports about tokens --- argonaut-common/Argonaut/Libraries/Common.pm | 2 ++ argonaut-fai-server/bin/argonaut-fai-monitor | 2 +- argonaut-server/bin/argonaut-server | 2 +- 3 files changed, 4 insertions(+), 2 deletions(-) diff --git a/argonaut-common/Argonaut/Libraries/Common.pm b/argonaut-common/Argonaut/Libraries/Common.pm index f2f1c79..b78a792 100644 --- a/argonaut-common/Argonaut/Libraries/Common.pm +++ b/argonaut-common/Argonaut/Libraries/Common.pm @@ -86,6 +86,8 @@ BEGIN )], 'string' => [qw( &argonaut_gen_random_str + &argonaut_gen_ssha_token + &argonaut_check_ssha_token )], 'net' => [qw( &argonaut_get_mac diff --git a/argonaut-fai-server/bin/argonaut-fai-monitor b/argonaut-fai-server/bin/argonaut-fai-monitor index a3133c5..bddd847 100644 --- a/argonaut-fai-server/bin/argonaut-fai-monitor +++ b/argonaut-fai-server/bin/argonaut-fai-monitor @@ -32,7 +32,7 @@ use warnings; use 5.008; -use Argonaut::Libraries::Common qw(:ldap :file :config); +use Argonaut::Libraries::Common qw(:ldap :file :config :string); use if (USE_LEGACY_JSON_RPC), 'JSON::RPC::Legacy::Client'; use if not (USE_LEGACY_JSON_RPC), 'JSON::RPC::Client'; diff --git a/argonaut-server/bin/argonaut-server b/argonaut-server/bin/argonaut-server index d012be1..a05fd0e 100644 --- a/argonaut-server/bin/argonaut-server +++ b/argonaut-server/bin/argonaut-server @@ -34,7 +34,7 @@ use warnings; use 5.010; -use Argonaut::Libraries::Common qw(:ldap :config :file); +use Argonaut::Libraries::Common qw(:ldap :config :file :string); use Argonaut::Libraries::Packages qw(get_packages_info store_packages_file); use POE qw(Component::Schedule Component::Server::JSONRPC::Http); -- 1.7.10.4