use strict;
use warnings;
-use Test::More tests => 13;
+use Test::More tests => 17;
use Data::Dump qw(dump);
use lib 'lib';
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';