From f2613c3c826fbdd95d8b8e6f94ff19b3ae203c1b Mon Sep 17 00:00:00 2001 From: mgehre <> Date: Sun, 24 Feb 2013 17:16:19 +0000 Subject: [PATCH] MAX: fix perl warning git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@2798 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- FHEM/10_MAX.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/FHEM/10_MAX.pm b/FHEM/10_MAX.pm index b3679e29e..dd171b450 100755 --- a/FHEM/10_MAX.pm +++ b/FHEM/10_MAX.pm @@ -224,7 +224,7 @@ MAX_ParseWeekProfile(@) { sub MAX_WakeUp($) { - my $hash = @_[0]; + my $hash = $_[0]; #3F corresponds to 31 seconds wakeup (so its probably the lower 5 bits) return ($hash->{IODev}{Send})->($hash->{IODev},"WakeUp",$hash->{addr}, "3F", callbackParam => "31" ); }