summaryrefslogtreecommitdiffstats
path: root/os-plugins
diff options
context:
space:
mode:
authorDirk von Suchodoletz2008-12-23 10:31:29 +0100
committerDirk von Suchodoletz2008-12-23 10:31:29 +0100
commit93192f4a7d1794303f50289a23029e98e522f537 (patch)
tree1488026a1a7bbe1efe92ff5a6b20ce26ab4e6dfb /os-plugins
parentShould be added to the link list too (see r2454) (diff)
downloadcore-93192f4a7d1794303f50289a23029e98e522f537.tar.gz
core-93192f4a7d1794303f50289a23029e98e522f537.tar.xz
core-93192f4a7d1794303f50289a23029e98e522f537.zip
Fixing a bug of r2445 Reiner pointed out ...
git-svn-id: http://svn.openslx.org/svn/openslx/openslx/trunk@2456 95ad53e4-c205-0410-b2fa-d234c58c8868
Diffstat (limited to 'os-plugins')
-rw-r--r--os-plugins/plugins/qemukvm/OpenSLX/OSPlugin/qemukvm.pm14
1 files changed, 6 insertions, 8 deletions
diff --git a/os-plugins/plugins/qemukvm/OpenSLX/OSPlugin/qemukvm.pm b/os-plugins/plugins/qemukvm/OpenSLX/OSPlugin/qemukvm.pm
index 2d49ede7..80b14761 100644
--- a/os-plugins/plugins/qemukvm/OpenSLX/OSPlugin/qemukvm.pm
+++ b/os-plugins/plugins/qemukvm/OpenSLX/OSPlugin/qemukvm.pm
@@ -8,10 +8,10 @@
#
# General information about OpenSLX can be found at http://openslx.org/
# -----------------------------------------------------------------------------
-# vmware.pm
-# - declares necessary information for the qemukvmplugin
+# qemukvm.pm
+# - declares necessary information for the qemukvm plugin
# -----------------------------------------------------------------------------
-package OpenSLX::OSPlugin::vmware;
+package OpenSLX::OSPlugin::qemukvm;
use strict;
use warnings;
@@ -27,7 +27,6 @@ use OpenSLX::Utils;
sub new
{
my $class = shift;
-
my $self = {
name => 'qemukvm',
};
@@ -113,7 +112,7 @@ sub installationPhase
my $engine = $self->{'os-plugin-engine'};
# different names of the tool (should be unified somehow!?)
- if (!isInPath('qemu-kvm' || !isInPath('kvm')) {
+ if (!isInPath('qemu-kvm') || !isInPath('kvm')) {
$engine->installPackages(
$engine->getInstallablePackagesForSelection('qemu-kvm')
);
@@ -126,7 +125,6 @@ sub removalPhase
my $self = shift;
my $info = shift;
-
return;
}
@@ -135,9 +133,9 @@ sub checkStage3AttrValues
my $self = shift;
my $stage3Attrs = shift;
my $vendorOSAttrs = shift;
- my @problems;
+ #my @problems;
- my $vmimg = $stage3Attrs->{'qemukvm::imagesrc'} || '';
+ #my $vmimg = $stage3Attrs->{'qemukvm::imagesrc'} || '';
return;
}