From 5e6745fd3f05e8b559521672e9bc31195e949214 Mon Sep 17 00:00:00 2001
From: Andreas Guldstrand <andreas.guldstrand@gmail.com>
Date: Wed, 9 Mar 2016 16:56:54 +0100
Subject: Make sure we have SBOs to check

---
 SBO-Lib/lib/SBO/Lib.pm | 6 ++++--
 1 file changed, 4 insertions(+), 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 618a5dd..818d8b8 100644
--- a/SBO-Lib/lib/SBO/Lib.pm
+++ b/SBO-Lib/lib/SBO/Lib.pm
@@ -416,8 +416,10 @@ sub get_installed_packages {
 
 	# Otherwise, mark the SBO ones and filter
 	my @sbos = map { $_->{name} } grep { $_->{build} =~ m/_SBo(|compat32)$/ } @pkgs;
-	my %locations = get_sbo_locations(map { s/-compat32//gr } @sbos);
-	foreach my $sbo (@sbos) { $types{$sbo} = 'SBO' if $locations{ $sbo =~ s/-compat32//gr }; }
+	if (@sbos) {
+		my %locations = get_sbo_locations(map { s/-compat32//gr } @sbos);
+		foreach my $sbo (@sbos) { $types{$sbo} = 'SBO' if $locations{ $sbo =~ s/-compat32//gr }; }
+	}
 	return [ map { +{ name => $_->{name}, version => $_->{version} } } grep { $types{$_->{name}} eq $filter } @pkgs ];
 }
 
-- 
cgit v1.2.3