aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorxocel <xocel@iquidus.org>2012-12-16 12:34:47 +1300
committerxocel <xocel@iquidus.org>2012-12-16 12:34:47 +1300
commitc9805aa0aa20292f4b9f3ca807a65767e57c973f (patch)
tree4223466895b5c6c698dae999891bcf5f27eae3fb
parent2f47af620822442423a3b9ebff85f36f559334b4 (diff)
downloadsbotools2-c9805aa0aa20292f4b9f3ca807a65767e57c973f.tar.xz
fixed duplicates in queue when req matches sbo on command line
-rwxr-xr-xsboupgrade10
1 files changed, 6 insertions, 4 deletions
diff --git a/sboupgrade b/sboupgrade
index 20f98e0..96f9acf 100755
--- a/sboupgrade
+++ b/sboupgrade
@@ -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