aboutsummaryrefslogtreecommitdiff
path: root/sbofind
diff options
context:
space:
mode:
authorxocel <xocel@iquidus.org>2012-10-15 17:59:10 +1300
committerxocel <xocel@iquidus.org>2012-10-15 17:59:10 +1300
commit901c1458ec200d341703bd92e79f35f5049c3368 (patch)
treefe02ae6b9531c98d50b8a27b6dd47906b053e608 /sbofind
parentb58b73ea8a5686ecdc2d31acfba5999d32436619 (diff)
downloadsbotools2-901c1458ec200d341703bd92e79f35f5049c3368.tar.xz
sboremove: %README% support + general improvements
Diffstat (limited to 'sbofind')
-rwxr-xr-xsbofind10
1 files changed, 7 insertions, 3 deletions
diff --git a/sbofind b/sbofind
index ec2fb3e..b0cc7e5 100755
--- a/sbofind
+++ b/sbofind
@@ -7,6 +7,8 @@
#
# author: Jacob Pipkin <j@dawnrazor.net>
# license: WTFPL <http://sam.zoy.org/wtfpl/COPYING>
+#
+# modified by: Luke Williams <xocel@iquidus.org>
use 5.16.0;
use strict;
@@ -93,10 +95,12 @@ sub get_file_contents ($) {
return $contents;
}
+# get build queue and return it as a single line.
sub show_build_queue ($) {
- exists $_[0] or script_error 'prepare_queue requires an argument.';
- my $queue = join(" ", get_build_queue($_[0]));
- return "$queue";
+ exists $_[0] or script_error 'show_build_queue requires an argument.';
+ my %warnings;
+ my $queue = get_build_queue($_[0], \%warnings);
+ return join(" ", @$queue);
}
my $findings = perform_search $search;