FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-10 09:16:53 +00:00
Code Issues Releases Wiki Activity

configDB - avoid annoying warning on optional parameter for reorg

Browse Source 
55_GDS - provide debug informations in loglevel 4 for conditions

git-svn-id: https://svn.fhem.de/fhem/trunk@5929 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
betateilchen 2014-05-22 11:42:51 +00:00
parent edae3aacda
commit 17bffdc7f6
2 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
fhem/FHEM/55_GDS.pm
View File

@ -686,6 +686,7 @@ sub retrieveConditions($$@){
"RR1" => "r", "RR24" => "r", "SSS" => "r", "DD" => "r", "FF" => "r", "FX" => "r", "Wetter/Wolken" => "l", "B\xF6en" => "l"); "RR1" => "r", "RR24" => "r", "SSS" => "r", "DD" => "r", "FF" => "r", "FX" => "r", "Wetter/Wolken" => "l", "B\xF6en" => "l");
foreach $item (@a) { foreach $item (@a) {
Log3($hash, 4, "conditions item: $item");
$wx{$item} = &readItem($line, $pos{$item}, $alignment{$item}, $item); $wx{$item} = &readItem($line, $pos{$item}, $alignment{$item}, $item);
} }

2
fhem/configDB.pm
View File

@ -725,7 +725,7 @@ sub _cfgDB_Recover($) {
# delete old configurations # delete old configurations
sub _cfgDB_Reorg(;$$) { sub _cfgDB_Reorg(;$$) {
my ($lastversion,$quiet) = @_; my ($lastversion,$quiet) = @_;
$lastversion = ($lastversion > 0) ? $lastversion : 3; $lastversion = (defined($lastversion)) ? $lastversion : 3;
Log3('configDB', 4, "DB Reorg started, keeping last $lastversion versions."); Log3('configDB', 4, "DB Reorg started, keeping last $lastversion versions.");
my $fhem_dbh = _cfgDB_Connect; my $fhem_dbh = _cfgDB_Connect;
$fhem_dbh->do("delete FROM fhemconfig where versionuuid in (select versionuuid from fhemversions where version > $lastversion)"); $fhem_dbh->do("delete FROM fhemconfig where versionuuid in (select versionuuid from fhemversions where version > $lastversion)");