configDB.pm: prevent perl warning when starting

git-svn-id: https://svn.fhem.de/fhem/trunk@10345 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
betateilchen
2016-01-03 11:44:41 +00:00
parent 74903cdaaa
commit 5300de7152

View File

@@ -336,7 +336,7 @@ sub cfgDB_ReadAll($) {
my ($cl) = @_;
my ($ret, @dbconfig);
if ($configDB{attr}{rescue} == 1) {
if (defined($configDB{attr}{rescue}) && ($configDB{attr}{rescue} == 1)) {
Log (0, 'configDB starting in rescue mode!');
push (@dbconfig, 'attr global modpath .');
push (@dbconfig, 'attr global verbose 3');