FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-02-07 16:59:18 +00:00
Code Issues Releases Wiki Activity

FHEMWEB.pm: remove debug. Change perlSyntaxChange regexp. (Forum #51744)

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@11221 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2016-04-10 13:52:31 +00:00
parent 84b3fbf305
commit c9a75c3d16
2 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
fhem/FHEM/01_FHEMWEB.pm
View File

@ -2536,7 +2536,6 @@ FW_Notify($$)
my $isRaw = ($h->{type} =~ m/raw/);
$events = deviceEvents($dev, AttrVal($FW_wname, "addStateEvent",!$isRaw))
if(!$events);
Log 1, "C: $dn $events->[0]";
if($isStatus) {
# Why is saving this stuff needed? FLOORPLAN?

2
fhem/fhem.pl
View File

@ -4571,7 +4571,7 @@ perlSyntaxCheck($%)
my $psc = AttrVal("global", "perlSyntaxCheck", ($featurelevel>5.7) ? 1 : 0);
return undef if(!$psc || !$init_done);
return undef if($exec !~ m/^{/);
return undef if($exec !~ m/^\s*{/);
$exec = EvalSpecials("{return undef; $exec}", %specials);
my $r = AnalyzePerlCommand(undef, $exec);