From a636f1ac70ad26f4b547b58c3916ca11f2d0ebbe Mon Sep 17 00:00:00 2001
From: Jacob Pipkin <j@dawnrazor.net>
Date: Sun, 4 Nov 2012 10:50:16 -0600
Subject: call get_sbo_location correctly for new changes

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

(limited to 'SBO-Lib/lib')

diff --git a/SBO-Lib/lib/SBO/Lib.pm b/SBO-Lib/lib/SBO/Lib.pm
index e7c8424..9774bc9 100644
--- a/SBO-Lib/lib/SBO/Lib.pm
+++ b/SBO-Lib/lib/SBO/Lib.pm
@@ -297,7 +297,7 @@ sub get_available_updates () {
 	my @updates;
 	my $pkg_list = get_installed_sbos; 
 	FIRST: for my $key (keys @$pkg_list) {
-		my $location = get_sbo_location $$pkg_list[$key]{name};
+		my $location = get_sbo_location ($$pkg_list[$key]{name});
 		# if we can't find a location, assume invalid and skip
 		next FIRST unless defined $location;
 		my $version = get_sbo_version $location;
@@ -733,7 +733,7 @@ sub add_to_queue ($) {
 	my $sbo = \${$args}{NAME};
 	return unless $$sbo;
 	unshift @$args{QUEUE}, $$sbo;
-	my $location = get_sbo_location $$sbo;
+	my $location = get_sbo_location ($$sbo);
 	return unless $location;
 	my $requires = get_from_info (LOCATION => $location, GET => 'REQUIRES');
 	FIRST: for my $req (@$requires) {
-- 
cgit v1.2.3