diff options
| author | Jacob Pipkin <j@dawnrazor.net> | 2012-11-01 23:22:07 -0500 |
|---|---|---|
| committer | Jacob Pipkin <j@dawnrazor.net> | 2012-11-01 23:22:07 -0500 |
| commit | ff2c85003c3e64b8f145b6f558b3d63b8e6541bb (patch) | |
| tree | 0759a7614d07ce2f604b0baad017d99029b771f7 /SBO-Lib/lib | |
| parent | 106895a334244fc0e63c71305410a8d21a4447f3 (diff) | |
| download | sbotools2-ff2c85003c3e64b8f145b6f558b3d63b8e6541bb.tar.xz | |
use my instead of state for $temp_queue, rip out $empty junk
Diffstat (limited to 'SBO-Lib/lib')
| -rw-r--r-- | SBO-Lib/lib/SBO/Lib.pm | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/SBO-Lib/lib/SBO/Lib.pm b/SBO-Lib/lib/SBO/Lib.pm index 1087fb4..e9f10d9 100644 --- a/SBO-Lib/lib/SBO/Lib.pm +++ b/SBO-Lib/lib/SBO/Lib.pm @@ -749,11 +749,10 @@ 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, $empty) = @_; - state $temp_queue = []; - $temp_queue = [] if $empty; + my ($sbos, $warnings) = @_; + my $temp_queue = []; for my $sbo (@$sbos) { my %args = ( QUEUE => $temp_queue,, |