From e06ec4a4398fe2b4606709d8b4764039fc17927c Mon Sep 17 00:00:00 2001
From: rudolfkoenig <>
Date: Sun, 7 Feb 2016 07:39:16 +0000
Subject: [PATCH] 01_FHEMWEB.pl: urlEncode another room fhem.pl: devspec2array
 fix for strange rooms

git-svn-id: https://svn.fhem.de/fhem/trunk@10747 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/01_FHEMWEB.pm | 2 +-
 fhem/fhem.pl            | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/fhem/FHEM/01_FHEMWEB.pm b/fhem/FHEM/01_FHEMWEB.pm
index df875cb73..f432abbae 100755
--- a/fhem/FHEM/01_FHEMWEB.pm
+++ b/fhem/FHEM/01_FHEMWEB.pm
@@ -2715,7 +2715,7 @@ FW_devState($$@)
       } else {
         $room =~ s/,.*//;
       }
-      $link .= "&room=$room";
+      $link .= "&room=".urlEncode($room);
     }
     $txt = "<a href=\"$FW_ME$FW_subdir?$link$rf$FW_CSRF\">$txt</a>"
        if($link !~ m/ noFhemwebLink\b/);
diff --git a/fhem/fhem.pl b/fhem/fhem.pl
index ffe19622f..58d7a5d48 100755
--- a/fhem/fhem.pl
+++ b/fhem/fhem.pl
@@ -1099,7 +1099,7 @@ devspec2array($;$)
     my @res;
     foreach my $dName (split(":FILTER=", $l)) {
       my ($n,$op,$re) = ("NAME","=",$dName);
-      if($dName =~ m/^([^!<>]*)(=|!=|<=|>=|<|>)(.*)$/) {
+      if($dName =~ m/^(.*?)(=|!=|<=|>=|<|>)(.*)$/) {
         ($n,$op,$re) = ($1,$2,$3);
         $isAttr = 1;    # Compatibility: return "" instead of $name
       }