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

70_Pushover: fix msgCancel

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@13930 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
jpawlowski 2017-04-08 08:13:41 +00:00
parent f4c0ab0a88
commit 566fef4942
1 changed files with 17 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
fhem/FHEM/70_Pushover.pm
View File

@ -602,11 +602,10 @@ sub Pushover_ReceiveCommand($$$) {
elsif ( $service =~ /^receipts\/(.*)\/cancel.json$/ ) {
my $receipt = $1;
keys %{ $hash->{READINGS} };
while ( my ( $key, $value ) = each %{ $hash->{READINGS} } ) {
my @delete;
foreach my $key ( %{ $hash->{READINGS} } ) {
if ( $key =~ /^cb_(\d+)$/
&& defined( $value->{VAL} )
&& $value->{VAL} eq $receipt )
&& $hash->{READINGS}{$key}{VAL} eq $receipt )
{
my $rAct = "cbAct_" . $1;
my $rAck = "cbAck_" . $1;
@ -618,12 +617,16 @@ sub Pushover_ReceiveCommand($$$) {
readingsBulkUpdate( $hash, $rAck, "1" );
readingsBulkUpdate( $hash, $rAckAt, int( time() ) );
readingsBulkUpdate( $hash, $rAckBy, "aborted" );
delete $hash->{READINGS}{$rCancelId}
if ( defined( $hash->{READINGS}{$rCancelId} ) );
keys %{ $hash->{READINGS} };
push @delete, $rCancelId;
}
}
}
# cleanup
foreach (@delete) {
delete $hash->{READINGS}{$_}
if ( defined( $hash->{READINGS}{$_} ) );
}
}
# glances.json
@ -1424,21 +1427,20 @@ sub Pushover_CancelMessage ($$$$) {
Log3 $name, 5, "Pushover $name: called function Pushover_CancelMessage()";
keys %{ $hash->{READINGS} };
while ( my ( $key, $value ) = each %{ $hash->{READINGS} } ) {
foreach my $string (@$cancelIds) {
foreach my $cancelId ( split( ',', $string ) ) {
foreach my $string (@$cancelIds) {
foreach my $cancelId ( split( ',', $string ) ) {
foreach my $key ( keys %{ $hash->{READINGS} } ) {
if ( $key =~ /^cbCancelId_(\d+)$/
&& defined( $value->{VAL} )
&& $value->{VAL} eq $cancelId )
&& $hash->{READINGS}{$key}{VAL} eq $cancelId )
{
$success = 1;
my $receipt = ReadingsVal( $name, "cb_" . $1, $1 );
my $receipt = $hash->{READINGS}{ "cb_" . $1 }{VAL};
$return .= " " if ($return);
$return .=
Pushover_SendCommand( $hash,
"receipts/$receipt/cancel.json" );
"receipts/$receipt/cancel.json" )
if ($receipt);
}
}
}