X-Git-Url: https://git.donarmstrong.com/?p=wannabuild.git;a=blobdiff_plain;f=bin%2Fwb-graph;h=743c1af29a76a7885fe3d9e065f91bdd2a021b0b;hp=24870d09a9f60f3a9009a3fb3dd3bf4d5239b435;hb=e0bd52fb8cf3c44ecd1e425d20613219b04963d6;hpb=7385765ef4c28872df38bfc3dd762ed1dc3b1a3a

diff --git a/bin/wb-graph b/bin/wb-graph
index 24870d0..743c1af 100755
--- a/bin/wb-graph
+++ b/bin/wb-graph
@@ -35,14 +35,15 @@ my $date=`date -u "+%m/%d/%Y %T"`;
 chop($date);
 print "$date";
 
-. /org/wanna-build/triggers/common
+my @archs = qw(alpha arm hppa hurd-i386 i386 ia64 m68k mips mipsel powerpc s390 amd64 sparc armel kfreebsd-amd64 kfreebsd-i386);
+my $arch;
 
-for arch in $ARCHS_unstable; do
+foreach $arch (@archs) {
 
 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$/) {
@@ -68,13 +69,14 @@ if ($?) {
 	print ", 0, 0";
 } else {
 #	$total -= $n_state{"Not-For-Us"};
+	$total -= $n_state{"Auto-Not-For-Us"};
 	if ( $previously_built ) {
 		print ", ".$n_state{"Installed"}.", ".$pu_total;
 	} else {
 		print ", ".$n_state{"Installed"}.", ".$total;
 	}
 }
-done
+}
 print "\n";
 
 exit 0;