sbotools2

Maintenance fork of the original sbotools version 2
Log | Files | Refs | README

commit 5e6745fd3f05e8b559521672e9bc31195e949214
parent 407af0476279ef3663fca00c82c5e5cdeab77312
Author: Andreas Guldstrand <andreas.guldstrand@gmail.com>
Date:   Wed,  9 Mar 2016 16:56:54 +0100

Make sure we have SBOs to check

Diffstat:
MSBO-Lib/lib/SBO/Lib.pm | 6++++--
1 file changed, 4 insertions(+), 2 deletions(-)

diff --git 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 ]; }