diff options
Diffstat (limited to 'SBO-Lib/lib/SBO')
| -rw-r--r-- | SBO-Lib/lib/SBO/Lib.pm | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/SBO-Lib/lib/SBO/Lib.pm b/SBO-Lib/lib/SBO/Lib.pm index 24fae5f..1087fb4 100644 --- a/SBO-Lib/lib/SBO/Lib.pm +++ b/SBO-Lib/lib/SBO/Lib.pm @@ -749,10 +749,11 @@ sub add_to_queue ($) { } # recursively add a sbo's requirements to the build queue. -sub get_build_queue ($$) { +sub get_build_queue ($$;$) { exists $_[1] or script_error 'get_build_queue requires two arguments.'; - my ($sbos, $warnings) = @_; - state $temp_queue = [()]; + my ($sbos, $warnings, $empty) = @_; + state $temp_queue = []; + $temp_queue = [] if $empty; for my $sbo (@$sbos) { my %args = ( QUEUE => $temp_queue,, |