From ae7154c1cf673295631fe7b307db4d6b1464a4d0 Mon Sep 17 00:00:00 2001
From: betateilchen <betateilchen@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Thu, 22 May 2014 11:42:51 +0000
Subject: [PATCH] configDB - avoid annoying warning on optional parameter for
 reorg 55_GDS - provide debug informations in loglevel 4 for conditions

git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@5929 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/55_GDS.pm | 1 +
 fhem/configDB.pm    | 2 +-
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/fhem/FHEM/55_GDS.pm b/fhem/FHEM/55_GDS.pm
index 6e28acf37..43f366126 100644
--- a/fhem/FHEM/55_GDS.pm
+++ b/fhem/FHEM/55_GDS.pm
@@ -686,6 +686,7 @@ sub retrieveConditions($$@){
 	"RR1" => "r", "RR24" => "r", "SSS" => "r", "DD" => "r", "FF" => "r", "FX" => "r", "Wetter/Wolken" => "l", "B\xF6en" => "l");
 	
 	foreach $item (@a) {
+		Log3($hash, 4, "conditions item: $item");
 		$wx{$item} = &readItem($line, $pos{$item}, $alignment{$item}, $item);
 	}
 
diff --git a/fhem/configDB.pm b/fhem/configDB.pm
index 6b92cdc47..b0efd4779 100644
--- a/fhem/configDB.pm
+++ b/fhem/configDB.pm
@@ -725,7 +725,7 @@ sub _cfgDB_Recover($) {
 # delete old configurations
 sub _cfgDB_Reorg(;$$) {
 	my ($lastversion,$quiet) = @_;
-	$lastversion = ($lastversion > 0) ? $lastversion : 3;
+	$lastversion = (defined($lastversion)) ? $lastversion : 3;
 	Log3('configDB', 4, "DB Reorg started, keeping last $lastversion versions.");
 	my $fhem_dbh = _cfgDB_Connect;
 	$fhem_dbh->do("delete FROM fhemconfig   where versionuuid in (select versionuuid from fhemversions where version > $lastversion)");