fhem.pl: fix event-min-interval issues caused by the last change (Forum #85406)

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

fhem/fhem.pl

@@ -359,7 +359,7 @@ my %ra = (
   "event-on-update-reading"    => { s=>",", c=>".attreour" },
   "event-on-change-reading"    => { s=>",", c=>".attreocr",   r=>":.*" },
   "timestamp-on-change-reading"=> { s=>",", c=>".attrtocr" },
-  "event-min-interval"         => { s=>",", c=>".attrminint", r=>";.*" },
+  "event-min-interval"         => { s=>",", c=>".attrminint", r=>":.*" },
   "oldreadings"                => { s=>",", c=>".or" },
   "devStateIcon"               => { s=>" ", r=>":.*", p=>"^{.*}\$",
                                     pv=>{"%name"=>1, "%state"=>1, "%type"=>1} },
@@ -2816,6 +2816,7 @@ CommandAttr($$)
 
         my @a = split($ra{$attrName}{s}, $lval) ;
         for my $v (@a) {
+          my $v = $v; # resolve the reference to avoid changing @a itself
           $v =~ s/$ra{$attrName}{r}// if($ra{$attrName}{r});
           my $err ="Argument $v for attr $sdev $attrName is not a valid regexp";
           return "$err: use .* instead of *" if($v =~ /^\*/); # no err in eval!?