* fixed a couple of 'use of uninitialized values' reported by Dirk

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

3 files changed, 3 insertions, 3 deletions

diff --git a/config-db/slxconfig b/config-db/slxconfig
index 94ebc13a..08d2d4e2 100755
--- a/config-db/slxconfig
+++ b/config-db/slxconfig
@@ -67,7 +67,7 @@ openslxInit();
 my $openslxDB = OpenSLX::ConfigDB->new();
 $openslxDB->connect();
 
-my $action = shift @ARGV;
+my $action = shift @ARGV || '';
 if ($action =~ m[^add-system$]i) {
     addSystemToConfigDB(@ARGV);
 } elsif ($action =~ m[^add-client$]i) {
diff --git a/installer/slxos-export b/installer/slxos-export
index bdebd9f3..ee1555ec 100755
--- a/installer/slxos-export
+++ b/installer/slxos-export
@@ -56,7 +56,7 @@ if ($versionReq) {
 
 openslxInit();
 
-my $action = shift @ARGV;
+my $action = shift @ARGV || '';
 
 if ($action =~ m[^list-ex]i) {
 	print _tr("List of exported vendor-OSes:\n");
diff --git a/installer/slxos-setup b/installer/slxos-setup
index f6d0052d..98685646 100755
--- a/installer/slxos-setup
+++ b/installer/slxos-setup
@@ -65,7 +65,7 @@ if ($> != 0) {
 
 openslxInit();
 
-my $action = shift @ARGV;
+my $action = shift @ARGV || '';
 
 # create ossetup-engine for given distro and start it:
 my $engine = OpenSLX::OSSetup::Engine->new;