Use -A instead of --database to selected the arch

[wannabuild.git] / bin / wb-graph

diff --git a/bin/wb-graph b/bin/wb-graph
index fb326e8e433edc62fdf3402e895f27ae53bcba3b..1ef1b1808dfb41b5ee83221830434b6f6ab688e5 100755 (executable)
--- a/bin/wb-graph
+++ b/bin/wb-graph
@@ -35,15 +35,14 @@ my $date=`date -u "+%m/%d/%Y %T"`;
 chop($date);
 print "$date";
 
-my @archs = qw(alpha arm hppa hurd-i386 i386 ia64 m68k mips mipsel powerpc s390 amd64 sparc armel kfreebsd-amd64 kfreebsd-i386);
-my $arch;
+. /org/wanna-build/triggers/common
 
-foreach $arch (@archs) {
+for arch in $ARCHS_unstable; do
 
 my($lastmsg, %n_state, $total, %n_builder, $pu_total);
 $pu_total = 0;
-$n_state{"Installed"} = 0;
-open( my $pipe, '-|', "wanna-build --database=$arch/build-db --dist=$dist --list=all" )
+$n_state{"Installed"} = 0; 
+open( my $pipe, '-|', "wanna-build -A $arch --dist=$dist --list=all" )
        or die "Cannot spawn wanna-build: $!\n";
 while( <$pipe> ) {
        if (/^Database for $dist doesn't exist$/) {
@@ -75,7 +74,7 @@ if ($?) {
                print ", ".$n_state{"Installed"}.", ".$total;
        }
 }
-}
+done
 print "\n";
 
 exit 0;