Merge branch 'attr'
[cloudstore.git] / t / Store.t
index b40a6de..89069c6 100755 (executable)
--- a/t/Store.t
+++ b/t/Store.t
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-use Test::More tests => 13;
+use Test::More tests => 17;
 use Data::Dump qw(dump);
 
 use lib 'lib';
@@ -60,7 +60,9 @@ ok my $sums = [ $r->md5sum_dump( $data->{login} ) ], 'md5sum_dump';
 ok scalar( grep { $_ =~ m/$data->{file}$/; } @$sums ) == 0, 'file md5 removed';
 diag dump $sums;
 
-ok $r->{api}->delete( $u => 'test' ), 'delete';
+ok $r->api->rename_file( $u, 'test' => 'test2' ), 'rename_file';
+
+ok $r->{api}->delete( $u => 'test2' ), 'delete';
 
 $data->{file} = 'md5sum';
 ok $r->rsync_transfer($data), 'rsync_transfer md5sum';