bug 5327 started testing
authorjohnboy <chansey.killer@hotmail.com>
Mon, 17 Jan 2011 22:34:39 +0000 (11:34 +1300)
committerChris Cormack <chrisc@catalyst.net.nz>
Mon, 17 Jan 2011 22:57:08 +0000 (11:57 +1300)
Signed-off-by: Chris Cormack <chrisc@catalyst.net.nz>
t/BackgroundJob.t

index 8885f05..faee9c1 100644 (file)
@@ -6,10 +6,28 @@
 use strict;
 use warnings;
 
-use Test::More tests => 1;
+use Test::More tests => 8;
 
 BEGIN {
         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");