summaryrefslogtreecommitdiffstats
path: root/lib/OpenSLX/DistroUtils/Engine.pm
diff options
context:
space:
mode:
authorBastian Wissler2009-06-05 20:17:40 +0200
committerBastian Wissler2009-06-05 20:17:40 +0200
commit6fb82427d4e3cb76e20700d8e0cfb609056ec2b9 (patch)
treec5bd7c32cd586e4ff482c27478d91d3906ea6c3f /lib/OpenSLX/DistroUtils/Engine.pm
parentFixing #450: (diff)
downloadcore-6fb82427d4e3cb76e20700d8e0cfb609056ec2b9.tar.gz
core-6fb82427d4e3cb76e20700d8e0cfb609056ec2b9.tar.xz
core-6fb82427d4e3cb76e20700d8e0cfb609056ec2b9.zip
Various changes to xserver plugin:
* added support for kernel version detection - yet from local function * now falls back to ati package installation, if download fails ATTENTION: If you have a recent Kernel Version in Suse-11.1, consider downgrading your Kernel to support fglrx-drivers from their RPM repository. git-svn-id: http://svn.openslx.org/svn/openslx/openslx/trunk@2937 95ad53e4-c205-0410-b2fa-d234c58c8868
Diffstat (limited to 'lib/OpenSLX/DistroUtils/Engine.pm')
-rw-r--r--lib/OpenSLX/DistroUtils/Engine.pm8
1 files changed, 6 insertions, 2 deletions
diff --git a/lib/OpenSLX/DistroUtils/Engine.pm b/lib/OpenSLX/DistroUtils/Engine.pm
index 88a1f166..839e6564 100644
--- a/lib/OpenSLX/DistroUtils/Engine.pm
+++ b/lib/OpenSLX/DistroUtils/Engine.pm
@@ -14,6 +14,7 @@
package OpenSLX::DistroUtils::Engine;
use OpenSLX::Basics;
+use Data::Dumper;
use strict;
use warnings;
@@ -35,11 +36,13 @@ sub loadDistro {
my $pathToClass = "$openslxConfig{'base-path'}/lib";
my $flags = {};
- $flags->{incPaths} = [ $pathToClass, "/mnt/$pathToClass" ];
+ #$flags->{incPaths} = [ $pathToClass, "/mnt/$pathToClass" ];
# for the case we call this function inside the chrooted environment of a plugin's
# install method we add the corrected searchpath to INC
# TODO: fix this problem via plugin engine
+ print 'DUMP INC 2';
+ print Dumper(@INC);
my $loaded = eval {
$distro = instantiateClass("OpenSLX::DistroUtils::${distroName}", $flags);
return 0 if !$distro; # module does not exist, try next
@@ -57,9 +60,10 @@ sub loadDistro {
if (!$loaded) {
vlog(1, "failed to load DistroUtils!");
+ vlog(1, $distroName);
}
return $distro;
}
-1; \ No newline at end of file
+1;