From f00eb65522f46a4d164c9c47ae515c8d75f6e622 Mon Sep 17 00:00:00 2001
From: betateilchen <>
Date: Sun, 20 Feb 2022 20:54:53 +0000
Subject: [PATCH] :debug version

git-svn-id: https://svn.fhem.de/fhem/trunk@25719 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/contrib/betateilchen/debug/configDB.pm | 17 +++++++++--------
 1 file changed, 9 insertions(+), 8 deletions(-)

diff --git a/fhem/contrib/betateilchen/debug/configDB.pm b/fhem/contrib/betateilchen/debug/configDB.pm
index d419a4e05..7a2ec23a9 100644
--- a/fhem/contrib/betateilchen/debug/configDB.pm
+++ b/fhem/contrib/betateilchen/debug/configDB.pm
@@ -574,14 +574,15 @@ sub cfgDB_SaveState {
 				}
 				$val = $rd->{VAL};
 				$val =~ s/;/;;/g;
-				$val =~ s/\n/\\\n/g;
+#				$val =~ s/\n/\\\n/g;
+                $val =~ s/\n/\$xyz\$/g;
 				$out = "setstate $d $rd->{TIME} $c $val";
-				if (length($out) > 65530) {
-                  my $uid = createUniqueId();
-				  FileWrite($uid,$val);
-				  $out = "setstate $d $rd->{TIME} $c cfgDBkey:$uid";
-                  Log 4, "configDB: r:$c d:$d key:$uid";
-				}
+#				if (length($out) > 65530) {
+#                  my $uid = createUniqueId();
+#				  FileWrite($uid,$val);
+#				  $out = "setstate $d $rd->{TIME} $c cfgDBkey:$uid";
+#                  Log 4, "configDB: r:$c d:$d key:$uid";
+#				}
                 push @rowList, $out; 
 			}
 		}
@@ -818,7 +819,7 @@ sub _cfgDB_ReadState {
     my ($err,@state) = cfgDB_FileRead($stateFileName);
     if ($err eq "") {
       Log 1, "configDB read state  ".$stateFileName;
-      push @dbconfig,@state;
+      map { my $a = $_; $a =~ s/\$xyz\$/\\n/g; push @dbconfig, $a } @state;
     } else {
       Log 1, "configDB read state from table fhemstate";
 	  my $fhem_dbh = _cfgDB_Connect;