From a6e66ece5c8012ab8bb6762af8d89e64258f8f95 Mon Sep 17 00:00:00 2001 From: rudolfkoenig Date: Sat, 21 Jul 2012 10:57:16 +0000 Subject: [PATCH] Rooms with space are not available for dropdown assignment. (removed   as it had other side effects) git-svn-id: https://fhem.svn.sourceforge.net/svnroot/fhem/trunk/fhem@1746 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- webfrontend/pgm2/01_FHEMWEB.pm | 13 +++++++++---- 1 file changed, 9 insertions(+), 4 deletions(-) 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