projects
/
gruntmaster-daemon.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Do not use removed functions
[gruntmaster-daemon.git]
/
lib
/
Gruntmaster
/
Daemon.pm
diff --git
a/lib/Gruntmaster/Daemon.pm
b/lib/Gruntmaster/Daemon.pm
index 51e0681bcb8933a780f41c9034ef6f6342a13aa5..9caa7dc9252123539425b93fbdf2a590040d39e6 100644
(file)
--- 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 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/;
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',
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';
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} = {
$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,
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{
}
sub got_job{
This page took
0.009536 seconds
and
4
git commands to generate.