summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorfranck cuny <franck@lumberjaph.net>2010-09-26 11:25:55 +0200
committerfranck cuny <franck@lumberjaph.net>2010-09-26 11:25:55 +0200
commit0aa7fae5d5ccc71132c9d8845cf4ebadb4dff1b5 (patch)
treed22d2d2d0cf06f66896f387a13a56a747a2805ff
parentxslate was missing (diff)
downloadjitterbug-0aa7fae5d5ccc71132c9d8845cf4ebadb4dff1b5.tar.gz
fix error o nget
-rw-r--r--lib/jitterbug.pm15
1 files changed, 8 insertions, 7 deletions
diff --git a/lib/jitterbug.pm b/lib/jitterbug.pm
index e4ebab2..0d27a85 100644
--- a/lib/jitterbug.pm
+++ b/lib/jitterbug.pm
@@ -17,17 +17,18 @@ get '/' => sub {
my @projects = ();
foreach (@proj_name) {
- my $proj = redis->get(key_project($_));
+ my $proj = redis->get( key_project($_) );
next unless $proj;
debug("on a $proj");
my $desc = from_json($proj);
my @ids = redis->smembers( key_builds_project($_) );
- my $res = redis->get( pop @ids );
- if ($res) {
- my $last_build = from_json($res);
- $desc->{last_build} = $last_build;
- }
- push @projects, $desc;
+ if(@ids) {
+ my $res = redis->get( pop @ids );
+ if ($res) {
+ my $last_build = from_json($res);
+ $desc->{last_build} = $last_build;
+ }
+ } push @projects, $desc;
}
@projects =