MAX: fix perl warning

git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@2798 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
mgehre 2013-02-24 17:16:19 +00:00
parent db050db38c
commit f2613c3c82

View File

@ -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" );
}