92_FileLog.pm: set FileLog to readonly if NAME eq Regexp (Forum #140177)
git-svn-id: https://svn.fhem.de/fhem/trunk@29455 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
@@ -183,6 +183,7 @@ FileLog_Define($@)
|
|||||||
eval { "Hallo" =~ m/^$a[3]$/ };
|
eval { "Hallo" =~ m/^$a[3]$/ };
|
||||||
return "Bad regexp: $@" if($@);
|
return "Bad regexp: $@" if($@);
|
||||||
|
|
||||||
|
$hash->{READONLY} = 1 if($a[3] eq $hash->{NAME});
|
||||||
my @t = localtime;
|
my @t = localtime;
|
||||||
my $f = ResolveDateWildcards($a[2], @t);
|
my $f = ResolveDateWildcards($a[2], @t);
|
||||||
if(!$hash->{READONLY}) {
|
if(!$hash->{READONLY}) {
|
||||||
|
|||||||
Reference in New Issue
Block a user