X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=t%2FGruntmaster-Data.t;h=3c97f067567fa9729d634a3474ca13fde2038721;hb=f20668d742eae08b6e1d24048572bdeef0eb51d3;hp=e9d20ac8cf7938b27d05fdd150a3c276eb0fd9c1;hpb=e340417cb98eddc0733c11405485602bf4c85c2e;p=gruntmaster-data.git diff --git a/t/Gruntmaster-Data.t b/t/Gruntmaster-Data.t index e9d20ac..3c97f06 100644 --- a/t/Gruntmaster-Data.t +++ b/t/Gruntmaster-Data.t @@ -1,7 +1,7 @@ #!/usr/bin/perl -w use v5.14; -use Test::More tests => 13; +use Test::More tests => 6; BEGIN { use_ok('Gruntmaster::Data') }; @@ -18,21 +18,3 @@ ok !$db->contest('rc')->is_pending(25), '!is_pending'; ok $db->contest('fc')->is_finished(25), 'is_finished'; ok !$db->contest('rc')->is_finished(25), '!is_finished'; ok $db->contest('rc')->is_running(25), 'is_running'; - -$db->problems->create({id => 'pb', name => 'Problem', generator => 'Undef', runner => 'File', judge => 'Absolute', level => 'beginner', value => 100, owner => 'MGV', statement => '...', testcnt => 1, timeout => 1, private => 0}); - -ok !$db->problem('pb')->is_private(25), '!is_private'; -$db->problem('pb')->update({private => 1}); -ok $db->problem('pb')->is_private(25), 'is_private (explicit)'; -$db->problem('pb')->update({private => 0}); - -$db->contest_problems->create({contest => 'pc', problem => 'pb'}); -ok $db->problem('pb')->is_private(25), 'is_private (implicit)'; -ok $db->problem('pb')->is_in_archive(25), 'is_in_archive'; - -$db->contest_problems->create({contest => 'rc', problem => 'pb'}); -ok $db->problem('pb')->is_private(25), 'is_private (also implicit)'; -ok !$db->problem('pb')->is_in_archive(25), '!is_in_archive'; - -$db->contest_problems->find('rc', 'pb')->delete; -ok $db->problem('pb')->is_in_archive(25), 'is_in_archive (again)';