2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-03 16:56:54 +00:00

48_MieleAtHome: fix 'set' actions

git-svn-id: https://svn.fhem.de/fhem/trunk@23342 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
choenig 2020-12-13 13:11:08 +00:00
parent 970db3e6f8
commit 039f0507dd

View File

@ -35,7 +35,7 @@ use Encode qw(encode_utf8);
use List::Util qw[min max];
use JSON;
my $version = "1.0.0";
my $version = "1.0.1";
my $MAH_hasMimeBase64 = 1;
@ -1311,7 +1311,7 @@ sub MAH_setProcessAction($$)
my ($hash, $processActionName) = @_;
my $name = $hash->{NAME};
my $processActionId = grep{ PROCESS_ACTIONS->{$_} eq $processActionName } keys %{PROCESS_ACTIONS()};
my ($processActionId) = grep{ PROCESS_ACTIONS->{$_} eq $processActionName } keys %{PROCESS_ACTIONS()};
if (!defined $processActionId) {
return "invalid processAction: '${processActionName}'";
}
@ -1332,7 +1332,7 @@ sub MAH_setLight($$)
my ($hash, $lightActionName) = @_;
my $name = $hash->{NAME};
my $lightActionId = grep{ LIGHT_ACTIONS->{$_} eq $lightActionName } keys %{LIGHT_ACTIONS()};
my ($lightActionId) = grep{ LIGHT_ACTIONS->{$_} eq $lightActionName } keys %{LIGHT_ACTIONS()};
if (!defined $lightActionId) {
return "invalid light action: '${lightActionName}'";
}
@ -1353,7 +1353,7 @@ sub MAH_setVentilationStep($$)
my ($hash, $ventilationStepName) = @_;
my $name = $hash->{NAME};
my $ventilationStepId = grep{ VENTILATION_STEPS->{$_} eq $ventilationStepName } keys %{VENTILATION_STEPS()};
my ($ventilationStepId) = grep{ VENTILATION_STEPS->{$_} eq $ventilationStepName } keys %{VENTILATION_STEPS()};
if (!defined $ventilationStepId) {
return "invalid ventilation step: '${ventilationStepName}'";
}