diff --git a/webfrontend/pgm2/01_FHEMWEB.pm b/webfrontend/pgm2/01_FHEMWEB.pm index 20f830f44..19320bb85 100755 --- a/webfrontend/pgm2/01_FHEMWEB.pm +++ b/webfrontend/pgm2/01_FHEMWEB.pm @@ -145,7 +145,14 @@ FW_Define($$) return "Usage: define FHEMWEB [IPV6:] [global]" if($port !~ m/^(IPV6:)?\d+$/ || ($global && $global ne "global")); - return TcpServer_Open($hash, $port, $global); + my $ret = TcpServer_Open($hash, $port, $global); + + # Make sure that fhem only runs once + if($ret && !$init_done) { + Log 1, "$ret. Exiting."; + exit(1); + } + return $ret; } ##################################### @@ -753,8 +760,7 @@ FW_doDetail($) FW_makeTable($d, $defs{$d}{READINGS}); my $attrList = getAllAttr($d); - my $roomList = join(",", sort keys %FW_rooms); - $roomList=~s/ /\ /g; + my $roomList = join(",", sort grep !/ /, keys %FW_rooms); $attrList =~ s/room /room:$roomList /; FW_makeSelect($d, "attr", $attrList,"attr"); @@ -2051,7 +2057,6 @@ FW_ReadIcons() #foreach my $k (keys %FW_icons) { # Debug " icon: $k => " . $FW_icons{$k}; #} - } sub