75_MSG: compatibility update
git-svn-id: https://svn.fhem.de/fhem/trunk@13942 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
@@ -1914,6 +1914,13 @@ m/^(absent|disappeared|unauthorized|disconnected|unreachable)$/i
|
|||||||
while ( ( my $key, my $value ) =
|
while ( ( my $key, my $value ) =
|
||||||
each %$params )
|
each %$params )
|
||||||
{
|
{
|
||||||
|
# Compatibility to legacy schema:
|
||||||
|
# lowercase after _
|
||||||
|
$key =~
|
||||||
|
s/^($gatewayDevType)(_[A-Z0-9]+)$/\1\L\2\e/;
|
||||||
|
|
||||||
|
# remove gateway TYPE when
|
||||||
|
# used as prefix
|
||||||
$key =~ s/^$gatewayDevType\_//;
|
$key =~ s/^$gatewayDevType\_//;
|
||||||
$cmd .= " $key='$value'"
|
$cmd .= " $key='$value'"
|
||||||
if ( !defined( $h->{$key} )
|
if ( !defined( $h->{$key} )
|
||||||
@@ -1953,10 +1960,10 @@ m/^(absent|disappeared|unauthorized|disconnected|unreachable)$/i
|
|||||||
Log3 $logDevice, 5,
|
Log3 $logDevice, 5,
|
||||||
"msg $device: "
|
"msg $device: "
|
||||||
. "$type[$i] route command (fhem): $cmd";
|
. "$type[$i] route command (fhem): $cmd";
|
||||||
fhem $cmd, 1;
|
my $ret = fhem $cmd, 1;
|
||||||
if ($@) {
|
if ($ret) {
|
||||||
$error = 1;
|
$error = 1;
|
||||||
$loopReturn3 .= "$gatewayDev: $@\n";
|
$loopReturn3 .= "$gatewayDev: $ret\n";
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user