From a4220329531c939b5bf26d46e7c3e76dab1c8d5f Mon Sep 17 00:00:00 2001
From: betateilchen <>
Date: Fri, 5 Jan 2018 11:55:14 +0000
Subject: [PATCH] configdb: add some debug infos

git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@15787 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 configDB.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/configDB.pm b/configDB.pm
index 55bdba15e..c434bc096 100644
--- a/configDB.pm
+++ b/configDB.pm
@@ -897,13 +897,13 @@ sub _cfgDB_Migrate() {
 	$ret .= cfgDB_MigrationImport;
 	$ret .= "Migration completed\n\n";
 	Log3('configDB',4,'Migration completed.');
-	$ret .= _cfgDB_Info;
+	$ret .= _cfgDB_Info('');
 	return $ret;
 }
 
 # show database statistics
 sub _cfgDB_Info($) {
-	my ($configdb_svnId) = shift;
+	my ($configdb_svnId) = @_;
 	$configdb_svnId //= 'unknown';
 	my ($l, @r, $f);
 	for my $i (1..65){ $l .= '-';}
@@ -1035,7 +1035,7 @@ sub _cfgDB_Reorg(;$$) {
 	$fhem_dbh->disconnect();
 	eval qx(sqlite3 $cfgDB_filename vacuum) if($cfgDB_dbtype eq "SQLITE");
 	return if(defined($quiet));
-	return " Result after database reorg:\n"._cfgDB_Info;
+	return " Result after database reorg:\n"._cfgDB_Info('');
 }
 
 # delete temporary version