98_MSwitch.pm:Fix - more than one interval https://forum.fhem.de/index.php/topic,86199.msg893282.html#msg893282

git-svn-id: https://svn.fhem.de/fhem/trunk@18404 2b470e98-0d58-463d-a4d8-8e2adae1ed80

fhem/FHEM/98_MSwitch.pm

@@ -83,7 +83,7 @@ if ( $preconf && $preconf ne "" ) {
 }
 
 my $autoupdate = 'off';    #off/on
-my $version    = '2.10_test';
+my $version    = '2.10';
 my $vupdate    = 'V2.00'
   ; # versionsnummer der datenstruktur . änderung der nummer löst MSwitch_VUpdate aus .
 my $savecount = 30
@@ -7398,10 +7398,14 @@ sub MSwitch_Createtimer($) {
         $key = '\]';
         $option =~ s/$key//ig;
 
-        if ( $option =~
-m/(.*?)([0-9]{2}):([0-9]{2})\*([0-9]{2}:[0-9]{2})-([0-9]{2}:[0-9]{2})\|?([0-9]{0,7})(.*)?/
-          )
+      
+		
+		my $y =0;
+        while ( $option =~ m/(.*?)([0-9]{2}):([0-9]{2})\*([0-9]{2}:[0-9]{2})-([0-9]{2}:[0-9]{2})\|?([0-9]{0,7})(.*)?/)
         {
+		$y++;
+		last if $y > 20;
+	
             my $part1 = '';
             $part1 = $1 . ' ' if defined $1;
             my $part6 = '';