FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-04-22 20:24:36 +00:00
Code Issues Releases Wiki Activity

93_DbRep: contrib 8.42.7

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@23852 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
nasseeder1 2021-02-28 15:54:50 +00:00
parent b22551a0a0
commit fe14a1d1d5
1 changed files with 1 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
fhem/contrib/DS_Starter/93_DbRep.pm
View File

@ -57,7 +57,6 @@ no if $] >= 5.017011, warnings => 'experimental::smartmatch';
# Version History intern # Version History intern
my %DbRep_vNotesIntern = ( my %DbRep_vNotesIntern = (
"8.42.8" => "28.02.2021 sqlCmdBlocking accept multiple SQL Statements ",
"8.42.7" => "27.02.2021 fix attribute sqlCmdVars is not working in sqlCmdBlocking Forum: /topic,53584.msg1135528.html#msg1135528", "8.42.7" => "27.02.2021 fix attribute sqlCmdVars is not working in sqlCmdBlocking Forum: /topic,53584.msg1135528.html#msg1135528",
"8.42.6" => "25.02.2021 fix commandref ", "8.42.6" => "25.02.2021 fix commandref ",
"8.42.5" => "02.02.2021 correct possible values for attr seqDoubletsVariance ", "8.42.5" => "02.02.2021 correct possible values for attr seqDoubletsVariance ",
@ -11734,7 +11733,6 @@ sub DbRep_sqlCmdBlocking {
return $err; return $err;
} }
$cmd =~ s/\;\;/ESC_ESC_ESC/gx; # ersetzen von escapeten ";" (;;)
my $sql = ($cmd =~ m/\;$/xs) ? $cmd : $cmd.";"; my $sql = ($cmd =~ m/\;$/xs) ? $cmd : $cmd.";";
Log3 ($name, 4, "DbRep $name - -------- New selection --------- "); Log3 ($name, 4, "DbRep $name - -------- New selection --------- ");
@ -11766,8 +11764,6 @@ sub DbRep_sqlCmdBlocking {
$sql = $2; $sql = $2;
} }
$sql =~ s/ESC_ESC_ESC/;/gx; # wiederherstellen von escapeten ";" -> umwandeln von ";;" in ";"
if($set) { if($set) {
Log3($name, 4, "DbRep $name - Set SQL session variables: $set"); Log3($name, 4, "DbRep $name - Set SQL session variables: $set");
eval {$dbh->do($set);}; # @\RB = Resetbit wenn neues Selektionsintervall beginnt eval {$dbh->do($set);}; # @\RB = Resetbit wenn neues Selektionsintervall beginnt