From c11b99baed8838ced046b9af11cc297c01c14d73 Mon Sep 17 00:00:00 2001
From: rudolfkoenig <>
Date: Sun, 4 Feb 2018 19:52:51 +0000
Subject: [PATCH] fhem.pl: setreading check for good reading characters (Forum
 #83840)

git-svn-id: https://svn.fhem.de/fhem/trunk@16087 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/fhem.pl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/fhem/fhem.pl b/fhem/fhem.pl
index ae81ce9da..52f60f3de 100755
--- a/fhem/fhem.pl
+++ b/fhem/fhem.pl
@@ -2247,6 +2247,8 @@ CommandSetReading($$)
       ($err, @b) = ReplaceSetMagic($hash, 3, @a);
       delete $hash->{CL};
     }
+    return "WARNING: unsupported character in reading $b[1] ".
+           "(not A-Za-z/\\d_\\.-)" if(!goodReadingName($b[1]));
     readingsSingleUpdate($defs{$sdev}, $b[1], $b[2], 1);
   }
   return join("\n", @rets);
@@ -2760,7 +2762,7 @@ CommandAttr($$)
         $arg= defined($8) ? $8 : "";
       }
       $hash->{'.userReadings'}= \@userReadings;
-    } 
+    }
 
     my $oVal = ($attr{$sdev} ? $attr{$sdev}{$attrName} : "");