From 6cd89e360edfe521ddf65763da51771621583e5a Mon Sep 17 00:00:00 2001 From: Dobrica Pavlinusic Date: Fri, 18 May 2012 14:48:21 +0200 Subject: [PATCH] setup test SLICE and expect md5 as login for user --- t/API.t | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/t/API.t b/t/API.t index 4f81d1f..9fdaf1c 100755 --- a/t/API.t +++ b/t/API.t @@ -10,11 +10,13 @@ use lib 'lib'; use_ok 'CloudStore::API'; +BEGIN { $ENV{SLICE} = '/rsync1/s1' } + ok my $o = CloudStore::API->new('s1'), 'new'; die 'You need to run this test as root' unless $> == 0; -cmp_ok $o->create_user('md5@example.com','md5sum',0), 'eq', 'u2000', 'create_user md5'; +cmp_ok $o->create_user('md5@example.com','md5sum',0), 'eq', 'md5', 'create_user md5'; ok my $info = $o->user_info( 'md5' ), 'user_info'; diag dump $info; -- 2.20.1