allow - in reading names for <{...}@readings>

git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@4714 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
justme1968
2014-01-22 16:29:16 +00:00
parent 7c95026e7f
commit a1ddc907b7

View File

@@ -361,7 +361,7 @@ readingsGroup_2html($)
my $txt = $1;
my $readings;
$item++;
if( $txt =~ m/^{(.*)}(@[\w|.*]+)?$/ ) {
if( $txt =~ m/^{(.*)}(@[\w-|.*]+)?$/ ) {
$txt = "{$1}";
$readings = $2;
@@ -659,7 +659,7 @@ readingsGroup_Notify($$)
my $txt = $1;
my $readings;
$item++;
if( $txt =~ m/^{(.*)}(@([\w|.*]+))?$/ ) {
if( $txt =~ m/^{(.*)}(@([\w-|.*]+))?$/ ) {
$txt = "{$1}";
$readings = $3;