X-Git-Url: http://git.ieval.ro/?p=gruntmaster-daemon.git;a=blobdiff_plain;f=lib%2FGruntmaster%2FDaemon.pm;h=9caa7dc9252123539425b93fbdf2a590040d39e6;hp=51e0681bcb8933a780f41c9034ef6f6342a13aa5;hb=495d496696d2d09f552bb08e683e699465806e75;hpb=94baf9b4ed469e6a20c27e192119048e7224766a diff --git a/lib/Gruntmaster/Daemon.pm b/lib/Gruntmaster/Daemon.pm index 51e0681..9caa7dc 100644 --- a/lib/Gruntmaster/Daemon.pm +++ b/lib/Gruntmaster/Daemon.pm @@ -9,7 +9,6 @@ our $VERSION = '5999.000_004'; use Gruntmaster::Daemon::Constants qw/ERR/; use Gruntmaster::Daemon::Format qw/prepare_files stopvms/; -use File::Basename qw/fileparse/; use File::Temp qw/tempdir/; use JSON qw/decode_json encode_json/; use Sys::Hostname qw/hostname/; @@ -28,6 +27,8 @@ use constant FORMAT_EXTENSION => { PASCAL => 'pas', PERL => 'pl', PYTHON => 'py', + RUBY => 'rb', + SBCL => 'l', }; ################################################## @@ -113,7 +114,7 @@ sub process_job { map { $_ => $job->problem->get_column($_) } qw/generator runner judge precnt testcnt timeout olimit/ }; $meta->{tests} = decode_json $job->problem->tests if $meta->{runner} eq 'File'; - delete $meta->{precnt} if $job->problem->is_in_archive; + delete $meta->{precnt} unless $job->contest; $meta->{testcnt} = $meta->{precnt} if $meta->{precnt}; $meta->{files}{ver} = { @@ -138,7 +139,7 @@ sub process_job { problem => $job->problem, owner => $job->owner, job => $job->id, - solved => $solved}) if !$job->problem->is_private; + solved => $solved}) if !$job->problem->private; } sub got_job{