From a12f907ff57a1c7296eee9506c84cb5769010170 Mon Sep 17 00:00:00 2001 From: jpawlowski Date: Sat, 1 Apr 2017 16:40:16 +0000 Subject: [PATCH] RESIDENTStk: fix parameters for GetType git-svn-id: https://svn.fhem.de/fhem/trunk@13871 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/RESIDENTStk.pm | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/fhem/FHEM/RESIDENTStk.pm b/fhem/FHEM/RESIDENTStk.pm index 711e1f94e..170cbbe9c 100644 --- a/fhem/FHEM/RESIDENTStk.pm +++ b/fhem/FHEM/RESIDENTStk.pm @@ -490,7 +490,7 @@ return;;\ # my $RESIDENTGROUPS = ""; - if ( RESIDENTStk_GetType($wakeupUserdevice) eq "RESIDENTS" ) { + if ( RESIDENTStk_IsDevice( $wakeupUserdevice, "RESIDENTS" ) ) { $RESIDENTGROUPS = $wakeupUserdevice; } elsif ( RESIDENTStk_IsDevice($wakeupUserdevice) @@ -1804,10 +1804,11 @@ sub RESIDENTStk_IsDevice($;$) { return 0; } -sub RESIDENTStk_GetType($) { +sub RESIDENTStk_GetType($;$) { my $devname = shift; + my $default = shift; - return "" unless ( RESIDENTStk_IsDevice($devname) ); + return $default unless ( RESIDENTStk_IsDevice($devname) ); return $defs{$devname}{TYPE}; }