projects
/
gruntmaster-data.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
17d4928
)
Do not include statement in problem_list
author
Marius Gavrilescu
<marius@ieval.ro>
Sun, 25 Jan 2015 21:23:02 +0000
(23:23 +0200)
committer
Marius Gavrilescu
<marius@ieval.ro>
Sun, 25 Jan 2015 21:23:02 +0000
(23:23 +0200)
lib/Gruntmaster/Data.pm
patch
|
blob
|
blame
|
history
diff --git
a/lib/Gruntmaster/Data.pm
b/lib/Gruntmaster/Data.pm
index 4cb6512965869fe4adcb56561bcb44823040cc68..6cdf3f52104c6c11a2ecd960c6a42efe7111128a 100644
(file)
--- a/
lib/Gruntmaster/Data.pm
+++ b/
lib/Gruntmaster/Data.pm
@@
-25,7
+25,7
@@
use HTTP::Tiny;
use PerlX::Maybe qw/maybe/;
use Sub::Name qw/subname/;
use PerlX::Maybe qw/maybe/;
use Sub::Name qw/subname/;
-use constant PROBLEM_PUBLIC_COLUMNS => [qw/id author writer level name owner private
statement
timeout olimit value/];
+use constant PROBLEM_PUBLIC_COLUMNS => [qw/id author writer level name owner private timeout olimit value/];
use constant USER_PUBLIC_COLUMNS => [qw/id admin name town university level/];
use constant JOBS_PER_PAGE => 10;
use constant USER_PUBLIC_COLUMNS => [qw/id admin name town university level/];
use constant JOBS_PER_PAGE => 10;
@@
-91,6
+91,7
@@
sub problem_entry {
my ($self, $id, $contest, $user) = @_;
my $running = $contest && $self->contest($contest)->is_running;
my $columns = PROBLEM_PUBLIC_COLUMNS;
my ($self, $id, $contest, $user) = @_;
my $running = $contest && $self->contest($contest)->is_running;
my $columns = PROBLEM_PUBLIC_COLUMNS;
+ push @$columns, 'statement';
push @$columns, 'solution' unless $running;
my $pb = $self->problems->find($id, {columns => $columns, prefetch => 'owner'});
my $open;
push @$columns, 'solution' unless $running;
my $pb = $self->problems->find($id, {columns => $columns, prefetch => 'owner'});
my $open;
This page took
0.011684 seconds
and
4
git commands to generate.