mirror of
https://github.com/fhem/fhem-mirror.git
synced 2025-05-04 22:19:38 +00:00
92_FileLog.pm: remove FileLog regexp Parts patch (Forum #32706)
git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@10129 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
parent
4fbe8f2869
commit
b5fe7e767f
@ -367,15 +367,8 @@ FileLog_fhemwebFn($$$$)
|
|||||||
|
|
||||||
$ret .= "<br>Regexp parts";
|
$ret .= "<br>Regexp parts";
|
||||||
$ret .= "<br><table class=\"block wide\">";
|
$ret .= "<br><table class=\"block wide\">";
|
||||||
|
my @ra = split(/\|/, $hash->{REGEXP});
|
||||||
my $regexp= $hash->{REGEXP};
|
if(@ra > 1) {
|
||||||
my @ra= ();
|
|
||||||
while($regexp =~ /^(.+?:.+?)\|(.+?:.+)$/) {
|
|
||||||
push @ra, $1;
|
|
||||||
$regexp= $2;
|
|
||||||
}
|
|
||||||
push @ra, $regexp;
|
|
||||||
if(@ra > 0) {
|
|
||||||
foreach my $r (@ra) {
|
foreach my $r (@ra) {
|
||||||
$ret .= "<tr class=\"".(($row++&1)?"odd":"even")."\">";
|
$ret .= "<tr class=\"".(($row++&1)?"odd":"even")."\">";
|
||||||
my $cmd = "cmd.X= set $d removeRegexpPart&val.X=$r"; # =.set: avoid JS
|
my $cmd = "cmd.X= set $d removeRegexpPart&val.X=$r"; # =.set: avoid JS
|
||||||
|
Loading…
x
Reference in New Issue
Block a user