setup test SLICE and expect md5 as login for user

diff --git a/t/API.t b/t/API.t
index 4f81d1f..9fdaf1c 100755 (executable)
--- 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;