Koha-community/Koha
13
7
Fork 0
Code Issues Releases Wiki Activity

bug 5327 started testing

Browse source 
Signed-off-by: Chris Cormack <chrisc@catalyst.net.nz>
This commit is contained in:
johnboy 2011-01-18 11:34:39 +13:00 committed by Chris Cormack
parent 594a31bfe1
commit 80f8c41e4c
1 changed files with 19 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

20
t/BackgroundJob.t
View file

@ -6,10 +6,28 @@
use strict; use strict;
use warnings; use warnings;
use Test::More tests => 1; use Test::More tests => 8;
BEGIN { BEGIN {
use_ok('C4::BackgroundJob'); use_ok('C4::BackgroundJob');
} }
#my ($sessionID, $job_name, $job_invoker, $num_work_units) = @_;
my $background;
ok ($background=C4::BackgroundJob->new);
ok ($background->id);
$background->name("George");
is ($background->name, "George", "testing name");
$background->invoker("enjoys");
is ($background->invoker, "enjoys", "testing invoker");
$background->progress("testing");
is ($background->progress, "testing", "testing progress");
ok ($background->status);
$background->size("56");
is ($background->size, "56", "testing size");