mhop/fhem
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

98_MSwitch.pm:Fix - Fix Perl warning / change include webcmds

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@19167 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
Byte09
2019-04-13 06:25:49 +00:00
parent 394bb925b9
commit f85e559e4f
1 changed files with 6 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
fhem/FHEM/98_MSwitch.pm
View File

@@ -3101,8 +3101,7 @@ sub MSwitch_checkbridge($$$) {
}
MSwitch_LOG( $name, 6, "suche nach schlüssel:-$event-" );
MSwitch_LOG( $name, 6,
"helper eventoid : " . $hash->{helper}{eventtoid}{$foundkey} );
MSwitch_LOG( $name, 6, "helper eventoid : " . $hash->{helper}{eventtoid}{$foundkey} ) if ($hash->{helper}{eventtoid}{$foundkey});
return "no_bridge" if $expertmode eq "0";
return "no_bridge" if $bridgemode eq "0";
@@ -3601,8 +3600,10 @@ sub MSwitch_fhemwebFn($$$$) {
$errors =~ s/\| //g;
$errors =~ s/\|//g;
if ( $errors eq ''
&& AttrVal( $Name, 'MSwitch_Include_Webcmds', "1" ) eq '1' )
# if ( $errors eq '' && AttrVal( $Name, 'MSwitch_Include_Webcmds', "1" ) eq '1' )
if ( AttrVal( $Name, 'MSwitch_Include_Webcmds', "1" ) eq '1' )
{
if ( $devicewebcmd ne "noArg" ) {
my $device = '';
@@ -3619,7 +3620,7 @@ sub MSwitch_fhemwebFn($$$$) {
}
chop $device;
$devicewebcmd = $device;
$errors = $devicewebcmd;
$errors .= ' ' . $devicewebcmd;
}
}