X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=t%2FAPI.t;h=9fdaf1c7d80e93277f5ddb9fb40005d183afb5a8;hb=f667e37e6d7e27ae08057481b2872bf701829e17;hp=4f81d1f25489cb03cd8cf6c8b60f05357e843f38;hpb=3b458e4db1acf5a7f200f38d629bed9f38632abd;p=cloudstore.git 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;