From 434931c792ecc5cbf29aa605289c4d7cf43c511b Mon Sep 17 00:00:00 2001
From: Pascal Terjan <pterjan@gmail.com>
Date: Fri, 18 Apr 2014 16:29:54 +0000
Subject: Fix syntax when there are dependencies

---
 NEWS | 2 ++
 ulri | 5 ++++-
 2 files changed, 6 insertions(+), 1 deletion(-)

diff --git a/NEWS b/NEWS
index 4459c7a..25fbbd9 100644
--- a/NEWS
+++ b/NEWS
@@ -1,3 +1,5 @@
+- fix code handling dependencies
+
 0.6.20
 - close stdin when --shell is not used
 - add an option to discard built packages
diff --git a/ulri b/ulri
index 82fe338..d64c32b 100755
--- a/ulri
+++ b/ulri
@@ -285,10 +285,11 @@ sub todo_func {
 	open my $FILE, "<$todo/$f/$m/$s/$r";
 	while(my $line = <$FILE>) {
 	    chomp $line;
+	    plog('DEBUG', "Adding dependency $line ($prefix)");
 	    push @deps,$line;
 	}
 
-	$pkg_tree{$prefix}{deps} = @deps;
+	$pkg_tree{$prefix}{deps} = \@deps;
     }
 }
 
@@ -533,6 +534,7 @@ foreach my $prefix (sort keys %pkg_tree) {
 	    next;
 	}
 	# $dep was not uploaded yet, so it's too early to build this one
+        plog('DEBUG', "Dependent build $dep not ready ($prefix)");
 	$ready = 0;
 	if (glob "$reject/*/*/*/$dep.youri" || glob "$done/*/*/*/${dep}_*.fail") {
 	    plog('ERROR', "Dependent build $dep has failed");
@@ -554,6 +556,7 @@ foreach my $prefix (sort keys %pkg_tree) {
     }
 
     next unless $ready;
+    plog('DEBUG', "No missing dependent build for $prefix");
 
     foreach my $media (keys %{$ent->{media}}) {
 	my $path = $ent->{media}{$media}{path};
-- 
cgit v1.2.1