From cb042eb7a7dcca1fa46859af29a6544cf76294fd Mon Sep 17 00:00:00 2001 From: Jacob Pipkin Date: Thu, 1 Nov 2012 22:14:10 -0500 Subject: tests for get_build_queue --- t/test.t | 8 ++++++++ 1 file changed, 8 insertions(+) (limited to 't/test.t') diff --git a/t/test.t b/t/test.t index 86470cf..8617fe7 100755 --- a/t/test.t +++ b/t/test.t @@ -351,3 +351,11 @@ $reqs = clean_reqs $reqs; ok ($$reqs[0] eq 'gob2', 'clean_reqs good for un/installed reqs.'); ok ($$reqs[1] eq 'libmpd', 'clean_reqs good for un/installed reqs.'); +my %warnings; +my $queue = get_build_queue 'zdoom', \%warnings; +my $count = @$queue; +ok ($count == 5, 'get_build_queue returns correct amount of sbos'); +ok ($$queue[0] eq 'p7zip', 'get_build_queue first entry correct'); +ok ($$queue[1] eq 'fmodapi', 'get_build_queue second entry correct'); +ok ($$queue[4] eq 'zdoom', 'get_build_queue last entry correct'); + -- cgit v1.2.3