X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=bin%2Fwb-graph;h=2a952d004b2374ef05cbc525c459917cf5d8e1a9;hb=f0efa26409a22befac812c957d7956329b0ee591;hp=b5dce42ed7e18937437c39416dea149db44e61b4;hpb=7b09fee8d7503ca518f28e9ba12951848524c652;p=wannabuild.git diff --git a/bin/wb-graph b/bin/wb-graph index b5dce42..2a952d0 100755 --- a/bin/wb-graph +++ b/bin/wb-graph @@ -5,7 +5,7 @@ use strict; use vars qw($dist); my $previously_built; -$dist = "unstable"; +$dist = "sid"; while( @ARGV && $ARGV[0] =~ /^-/ ) { $_ = shift @ARGV; @@ -19,11 +19,6 @@ while( @ARGV && $ARGV[0] =~ /^-/ ) { else { $dist = shift @ARGV; } - $dist = "oldstable" if $dist eq "o"; - $dist = "stable" if $dist eq "s"; - $dist = "tesing" if $dist eq "t"; - $dist = "unstable" if $dist eq "u"; - die "Bad distribution\n" if !isin($dist, qw(oldstable stable testing unstable)); } elsif (/^--$/) { last; @@ -48,7 +43,7 @@ foreach $arch (@archs) { my($lastmsg, %n_state, $total, %n_builder, $pu_total); $pu_total = 0; $n_state{"Installed"} = 0; -open( PIPE, "wanna-build --database=$arch/build-db --dist=$dist --list=all 2>&1 |" ) +open( PIPE, "wanna-build --database=$arch/build-db --dist=$dist --list=all |" ) or die "Cannot spawn wanna-build: $!\n"; while( ) { if (/^Database for $dist doesn't exist$/) {