From 1b4f73ffbb645f15ed9243dfceeadfe5460b8301 Mon Sep 17 00:00:00 2001
From: Oliver Tappe
Date: Mon, 24 Mar 2008 19:03:50 +0000
Subject: * getInstalledPackages() has to fetch the info from the packager, not
 the   meta-packager

git-svn-id: http://svn.openslx.org/svn/openslx/openslx/trunk@1683 95ad53e4-c205-0410-b2fa-d234c58c8868
---
 installer/OpenSLX/OSSetup/Engine.pm   | 7 +++++++
 os-plugins/OpenSLX/OSPlugin/Engine.pm | 6 +++---
 2 files changed, 10 insertions(+), 3 deletions(-)

diff --git a/installer/OpenSLX/OSSetup/Engine.pm b/installer/OpenSLX/OSSetup/Engine.pm
index 7fce8a59..cda09363 100644
--- a/installer/OpenSLX/OSSetup/Engine.pm
+++ b/installer/OpenSLX/OSSetup/Engine.pm
@@ -690,6 +690,13 @@ sub metaPackager
     return $self->{'meta-packager'};
 }
 
+sub packager
+{
+    my $self = shift;
+
+    return $self->{'packager'};
+}
+
 sub getInstallablePackagesForSelection
 {
     my $self   = shift;
diff --git a/os-plugins/OpenSLX/OSPlugin/Engine.pm b/os-plugins/OpenSLX/OSPlugin/Engine.pm
index 3d967166..6a587afd 100644
--- a/os-plugins/OpenSLX/OSPlugin/Engine.pm
+++ b/os-plugins/OpenSLX/OSPlugin/Engine.pm
@@ -353,10 +353,10 @@ sub getInstalledPackages
 {
     my $self = shift;
 
-    my $metaPackager = $self->{'ossetup-engine'}->metaPackager();
-    return if !$metaPackager;
+    my $packager = $self->{'ossetup-engine'}->packager();
+    return if !$packager;
 
-    return $metaPackager->getInstalledPackages();
+    return $packager->getInstalledPackages();
 }
 
 =item getInstallablePackagesForSelection()
-- 
cgit v1.2.3-55-g7522