From 43f8df5809a9644f8d9e488606072ee8edacf269 Mon Sep 17 00:00:00 2001
From: Oliver Tappe
Date: Sat, 12 Jan 2008 16:31:35 +0000
Subject: * avoid possible warnings about undefined values in
 regex-substitution

git-svn-id: http://svn.openslx.org/svn/openslx/trunk@1470 95ad53e4-c205-0410-b2fa-d234c58c8868
---
 config-db/slxconfig | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

(limited to 'config-db')

diff --git a/config-db/slxconfig b/config-db/slxconfig
index e8aaf2ca..f63224a9 100755
--- a/config-db/slxconfig
+++ b/config-db/slxconfig
@@ -194,14 +194,15 @@ sub parseKeyValueArgs
 			die _tr("unknown key '%s' specified for %s\n", $key, $table);
 		}
 
-		if ($value eq '-') {
-			$value = undef;
-		}
-
 		# replace escaped newlines and tab chars by the respective real thing
 		$value =~ s{\\n}{\n}gms;
 		$value =~ s{\\t}{\t}gms;
 
+		# accept '-' as placeholder for undefined
+		if ($value eq '-') {
+			$value = undef;
+		}
+
 		$dataHash{$key} = $value;
 	}
 
-- 
cgit v1.2.3-55-g7522