Bug 13457 - Followup for CPL and S codes
[koha.git] / t / db_dependent / BackgroundJob.t
index 0afa315..9ea2caa 100644 (file)
@@ -6,8 +6,8 @@
 use strict;
 use warnings;
 use C4::Auth;
-use CGI;
-use Test::More tests => 11;
+use CGI qw ( -utf8 );
+use Test::More tests => 14;
 
 BEGIN {
         use_ok('C4::BackgroundJob');
@@ -36,6 +36,12 @@ is ($background->size, "56", "testing size");
 
 ok (!$background->fetch($sessionID, $background->id), "testing fetch");
 
+$background->set({ key1 => 'value1', key2 => 'value2' });
+is ($background->get('key1'), 'value1', 'fetched extra value for key key1');
+is ($background->get('key2'), 'value2', 'fetched extra value for key key2');
+
+$background->set({ size => 666 });
+is ($background->size, "56", '->set() does not scribble over private object data');
 
 $background->finish("finished");
 is ($background->status,'completed', "testing finished");