ahuston-0/hydra
1
0
Fork 0
Code Issues Pull Requests 1 Packages Projects Releases Wiki Activity

hydra: minor improvements in hydra ui

Browse Source
This commit is contained in:
Rob Vermaas
2010-02-09 13:43:53 +00:00
parent fabc8e4774
commit 090a648020
3 changed files with 35 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
src/lib/Hydra/Controller/Jobset.pm
View File

@ -20,9 +20,10 @@ sub jobset : Chained('/') PathPart('jobset') CaptureArgs(2) {
or notFound($c, "Jobset $jobsetName doesn't exist.");
}
sub jobsetIndex {
my ($self, $c, $forceStatus) = @_;
sub index : Chained('jobset') PathPart('') Args(0) {
my ($self, $c) = @_;
print STDERR "index\n";
$c->stash->{template} = 'jobset.tt';
@ -46,7 +47,7 @@ sub index : Chained('jobset') PathPart('') Args(0) {
push(@systems, $system->system);
}
if(scalar(@{$c->stash->{activeJobs}}) <= 20) {
if($forceStatus || scalar(@{$c->stash->{activeJobs}}) <= 20) {
my @select = ();
my @as = ();
push(@select, "job"); push(@as, "job");
@ -71,6 +72,16 @@ sub index : Chained('jobset') PathPart('') Args(0) {
->search({finished => 1}, {order_by => "timestamp DESC", rows => 5 })] ;
}
sub index : Chained('jobset') PathPart('') Args(0) {
my ($self, $c) = @_;
jobsetIndex($self, $c, 0);
}
sub indexWithStatus : Chained('jobset') PathPart('') Args(1) {
my ($self, $c, $forceStatus) = @_;
jobsetIndex($self, $c, 1);
}
# Hydra::Base::Controller::ListBuilds needs this.
sub get_builds : Chained('jobset') PathPart('') CaptureArgs(0) {