use distroutils in xserver plugin

remove debug code

git-svn-id: http://svn.openslx.org/svn/openslx/openslx/trunk@2941 95ad53e4-c205-0410-b2fa-d234c58c8868

1 files changed, 0 insertions, 34 deletions

diff --git a/os-plugins/plugins/xserver/OpenSLX/Distro/Base.pm b/os-plugins/plugins/xserver/OpenSLX/Distro/Base.pm
index 70a08859..1cd26b56 100644
--- a/os-plugins/plugins/xserver/OpenSLX/Distro/Base.pm
+++ b/os-plugins/plugins/xserver/OpenSLX/Distro/Base.pm
@@ -186,38 +186,4 @@ sub getdkms
 }
 
 
-sub getKernelVersion
-{
-    my $self = shift;
-    my $kernelPath = shift;
-
-    my $newestKernelFile;
-    my $newestKernelFileSortKey = '';
-    my $sortKey;
-    my $kernelPattern = '{vmlinuz,kernel-genkernel-x86}-*';
-    foreach my $kernelFile (glob("$kernelPath/$kernelPattern")) {
-        next unless $kernelFile =~ m{
-            (?:vmlinuz|x86)-(\d+)\.(\d+)\.(\d+)(?:\.(\d+))?-(\d+(?:\.\d+)?)
-        }x;
-        $sortKey 
-            = sprintf("%02d.%02d.%02d.%02d-%2.1f", $1, $2, $3, $4||0, $5);
-        if ($newestKernelFileSortKey lt $sortKey) {
-            $newestKernelFile        = $kernelFile;
-            $newestKernelFileSortKey = $sortKey;
-        }
-    }
-
-    if (!defined $newestKernelFile) {
-        die _tr("unable to pick a kernel-file from path '%s'!", $kernelPath);
-    }
-
-    $newestKernelFile =~ /.*?-([.\-0-9]*)-([a-zA-Z]*?)$/;
-    my $kernel = {};
-    $kernel->{'version'} = $1;
-    $kernel->{'suffix'} = $2;
-    return $kernel;
-#    return $newestKernelFile;
-        
-}
-
 1;