From 03c33d6e2884ec45016ad1b76b7c48900efbd025 Mon Sep 17 00:00:00 2001
From: justme-1968 <justme-1968@users.noreply.github.com>
Date: Mon, 17 Feb 2014 16:35:41 +0000
Subject: [PATCH] fix for ...,0,... bug in <{...}>

git-svn-id: https://svn.fhem.de/fhem/trunk@4964 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/33_readingsGroup.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/fhem/FHEM/33_readingsGroup.pm b/fhem/FHEM/33_readingsGroup.pm
index 5ee3816ff..11cdd5412 100644
--- a/fhem/FHEM/33_readingsGroup.pm
+++ b/fhem/FHEM/33_readingsGroup.pm
@@ -362,7 +362,7 @@ readingsGroup_2html($)
     #foreach my $regex (@list) {
     for( my $i = 0; $i <= $#list; ++$i ) {
       my $regex = $list[$i];
-      while ($regex && $regex =~ m/^</ && $regex !~ m/>$/ && $list[++$i] ) {
+      while ($regex && $regex =~ m/^</ && $regex !~ m/>$/ && defined($list[++$i]) ) {
         $regex .= ",". $list[$i];
       }
       my $h = $h;
@@ -659,7 +659,7 @@ readingsGroup_Notify($$)
         #foreach my $regex (@list) {
         for( my $i = 0; $i <= $#list; ++$i ) {
         my $regex = $list[$i];
-          while ($regex && $regex =~ m/^</ && $regex !~ m/>$/ && $list[++$i] ) {
+          while ($regex && $regex =~ m/^</ && $regex !~ m/>$/ && defined($list[++$i]) ) {
             $regex .= ",". $list[$i];
           }
           next if( $reading eq "state" && !$show_state && (!defined($regex) || $regex ne "state") );