From f5567ef2e40cfc89f1d9bf632c0600ee538a9a7f Mon Sep 17 00:00:00 2001 From: Jacob Pipkin Date: Fri, 30 Nov 2012 02:38:07 -0600 Subject: dont create the build_queue backwards --- SBO-Lib/lib/SBO/Lib.pm | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'SBO-Lib/lib/SBO/Lib.pm') 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; } -- cgit v1.2.3