From 925ecfc00ce5ab771ff4337fcb9f1b27dc9570cb Mon Sep 17 00:00:00 2001 From: Dobrica Pavlinusic Date: Thu, 19 Apr 2012 13:52:52 +0200 Subject: [PATCH] test send_file with spaces in both arguments --- t/Gearman.t | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/t/Gearman.t b/t/Gearman.t index 3c19a23..c2df62f 100755 --- a/t/Gearman.t +++ b/t/Gearman.t @@ -2,7 +2,7 @@ use strict; use warnings; -use Test::More tests => 49; +use Test::More tests => 55; use Data::Dump qw(dump); use lib 'lib'; @@ -63,9 +63,15 @@ test_refresh_file_list "$u2"; my $files = gearman list_files => "~$u2"; like $files, qr|dir with space/file with space|, 'found sent file in list_files'; +gearman send_file => "~$u2/dir with space/file with space#~$u3/another dir with spaces/and file with spaces"; +test_refresh_file_list "$u3"; + gearman delete => "~$u2/dir with space/file with space"; test_refresh_file_list "$u2"; +gearman delete => "~$u3/another dir with spaces/and file with spaces"; +test_refresh_file_list "$u3"; + gearman send_file => "~$u1/foo.txt#~$u2/foo.txt"; test_refresh_file_list "$u2"; -- 2.20.1