From 1e91dcc885175b7fdc78f4f732c5b03f8c42b096 Mon Sep 17 00:00:00 2001
From: Dirk von Suchodoletz
Date: Tue, 17 Feb 2009 20:38:19 +0000
Subject: Small fixes ... (perl stuff failed)

git-svn-id: http://svn.openslx.org/svn/openslx/openslx/trunk@2594 95ad53e4-c205-0410-b2fa-d234c58c8868
---
 os-plugins/plugins/virtualbox/OpenSLX/Distro/Suse.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'os-plugins/plugins/virtualbox/OpenSLX/Distro/Suse.pm')

diff --git a/os-plugins/plugins/virtualbox/OpenSLX/Distro/Suse.pm b/os-plugins/plugins/virtualbox/OpenSLX/Distro/Suse.pm
index 77473533..c514c122 100644
--- a/os-plugins/plugins/virtualbox/OpenSLX/Distro/Suse.pm
+++ b/os-plugins/plugins/virtualbox/OpenSLX/Distro/Suse.pm
@@ -32,8 +32,10 @@ sub fillRunlevelScript
     my $location = shift;
     my $kind     = shift;
 
-    my $script = bla;
+    my $script = unshiftHereDoc(<<'    End-of-Here');
+    # put something into here ... 
 
+    End-of-Here
     return $script;
 }
 
-- 
cgit v1.2.3-55-g7522