Subject line (try to keep under 50 characters)
Multi-line description of commit, feel free to be detailed. [Ticket: X]
This commit is contained in:
parent
ddbe145179
commit
5d245d5a3d
@ -899,9 +899,9 @@ sub PollChild {
|
||||
|
||||
if ( defined( $hash->{".fhem"}{subprocess} ) ) {
|
||||
my $subprocess = $hash->{".fhem"}{subprocess};
|
||||
my $response = $subprocess->readFromChild();
|
||||
my @response = $subprocess->readFromChild();
|
||||
|
||||
if ( !defined($response) ) {
|
||||
if ( !defined(@response) ) {
|
||||
Log3( $name, 5,
|
||||
qq{GardenaSmartBridge ($name) - still waiting ($subprocess->{lasterror}).}
|
||||
);
|
||||
@ -923,8 +923,8 @@ qq{GardenaSmartBridge ($name) - got result from asynchronous parsing}
|
||||
|
||||
CleanSubprocess($hash);
|
||||
|
||||
if ( ref($response) eq 'ARRAY' ) {
|
||||
for my $json ( @{$response} ) {
|
||||
if ( scalar(@response) > 0 ) {
|
||||
for my $json (@response) {
|
||||
|
||||
#################
|
||||
$decode_json = eval { decode_json($json) };
|
||||
@ -968,7 +968,7 @@ sub ResponseSubprocessing {
|
||||
( $json, $tail ) = ParseJSON($tail);
|
||||
}
|
||||
|
||||
$subprocess->writeToParent( \@response );
|
||||
$subprocess->writeToParent(@response);
|
||||
|
||||
return;
|
||||
}
|
||||
|
@ -1,2 +1,2 @@
|
||||
UPD 2022-02-01_10:58:50 49892 FHEM/73_GardenaSmartBridge.pm
|
||||
UPD 2022-02-01_11:52:56 49880 FHEM/73_GardenaSmartBridge.pm
|
||||
UPD 2022-01-31_19:35:42 56993 FHEM/74_GardenaSmartDevice.pm
|
||||
|
Loading…
x
Reference in New Issue
Block a user