diff options
author | Jacob Pipkin <j@dawnrazor.net> | 2012-11-30 02:38:07 -0600 |
---|---|---|
committer | Jacob Pipkin <j@dawnrazor.net> | 2012-11-30 02:38:07 -0600 |
commit | f5567ef2e40cfc89f1d9bf632c0600ee538a9a7f (patch) | |
tree | 2825020633ce98e94a696a528e2a0ae63f967e9c | |
parent | d65b89b87425fd7ac86f7c0431ffd633d31b32a5 (diff) | |
download | sbotools2-f5567ef2e40cfc89f1d9bf632c0600ee538a9a7f.tar.xz |
dont create the build_queue backwards
-rw-r--r-- | SBO-Lib/lib/SBO/Lib.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/SBO-Lib/lib/SBO/Lib.pm b/SBO-Lib/lib/SBO/Lib.pm index 89f65dd..1502532 100644 --- a/SBO-Lib/lib/SBO/Lib.pm +++ b/SBO-Lib/lib/SBO/Lib.pm @@ -727,7 +727,6 @@ sub add_to_queue ($) { my $sbo = \${$args}{NAME}; return unless $$sbo; push @$args{QUEUE}, $$sbo; -# unshift @$args{QUEUE}, $$sbo; my $location = get_sbo_location ($$sbo); return unless $location; my $requires = get_from_info (LOCATION => $location, GET => 'REQUIRES'); @@ -757,7 +756,7 @@ sub get_build_queue { } # Remove duplicate entries (leaving first occurrence) my (%seen, @build_queue); - FIRST: for my $sb (reverse @$temp_queue) { + FIRST: for my $sb (@$temp_queue) { next FIRST if $seen{$sb}++; push @build_queue, $sb; } |