diff options
| author | xocel <xocel@iquidus.org> | 2012-12-16 12:34:47 +1300 | 
|---|---|---|
| committer | xocel <xocel@iquidus.org> | 2012-12-16 12:34:47 +1300 | 
| commit | c9805aa0aa20292f4b9f3ca807a65767e57c973f (patch) | |
| tree | 4223466895b5c6c698dae999891bcf5f27eae3fb | |
| parent | 2f47af620822442423a3b9ebff85f36f559334b4 (diff) | |
| download | sbotools2-c9805aa0aa20292f4b9f3ca807a65767e57c973f.tar.xz | |
fixed duplicates in queue when req matches sbo on command line
| -rwxr-xr-x | sboupgrade | 10 | 
1 files changed, 6 insertions, 4 deletions
@@ -93,7 +93,6 @@ if ($compat32) {  # if we can't find SLACKBUILDS.TXT in $config{HOME}, prompt to fetch the tree  slackbuilds_or_fetch; -my $rootpkg = $ARGV[0];  my %warnings;  my %options;  my $build_queue; @@ -104,10 +103,13 @@ if ($no_reqs or $non_int) {      $build_queue = \@ARGV;  } else {  	for my $sbo (@ARGV) { -		my $queue = get_build_queue ([$sbo], \%warnings); -		push @$build_queue, reverse @$queue; -	}	 +        my $queue = get_build_queue ([$sbo], \%warnings); +        for my $item (reverse @$queue) { +            push @$build_queue, $item unless $item ~~ @$build_queue; +        } +	}  } +  for my $sbo (@$build_queue) {      $locations{$sbo} = get_sbo_location ($sbo);  	die "Unable to locate $sbo in the SlackBuilds.org tree.\n" unless  | 
