migrate test-gearman.sh into test
[cloudstore.git] / t / Gearman.t
index 9ef9f7c..6761056 100755 (executable)
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-use Test::More tests => 5;
+use Test::More tests => 11;
 use Data::Dump qw(dump);
 
 use lib 'lib';
@@ -30,3 +30,14 @@ gearman( 'user_usage' => $user );
 gearman( $hostname . '_s1_torrent_list' );
 
 
+gearman send_file => '~u2001/foo.txt#~u2002/dir with space/file with space';
+
+gearman delete => '~u2002/dir with space/file with space';
+
+gearman send_file => '~u2001/foo.txt#~u2002/foo.txt';
+
+gearman rename_file => '~u2002/foo.txt#bar.txt';
+gearman rename_file => '~u2002/bar.txt#baz.txt';
+
+gearman delete => '~u2002/baz.txt';
+