more store test cleanups
authorDobrica Pavlinusic <dpavlin@rot13.org>
Mon, 12 Dec 2011 00:12:15 +0000 (01:12 +0100)
committerDobrica Pavlinusic <dpavlin@rot13.org>
Mon, 12 Dec 2011 00:12:15 +0000 (01:12 +0100)
t/Store.t

index 4b601f7..a8c8a96 100755 (executable)
--- a/t/Store.t
+++ b/t/Store.t
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-use Test::More tests => 15;
+use Test::More tests => 8;
 use Data::Dump qw(dump);
 
 use lib 'lib';
@@ -43,9 +43,13 @@ if ( ! -e $full_path ) {
        print $fh "test\n" || die $!;
        close $fh;
        diag "$full_path created";
+       chown $u->{uid}, $u->{gid}, $full_path;
 }
 
 ok my $d = $r->rsync_transfer($data), 'rsync_transfer';
 diag dump($d);
 
-ok($r->removed_file($data), 'removed_file');
+ok $r->removed_file($data), 'removed_file';
+
+ok $r->cleanup_pid( $data->{pid} ), 'cleanup_pid';
+