From eddd7cc178019329a63a1ecd198aa9c42a78a338 Mon Sep 17 00:00:00 2001 From: rudolfkoenig <> Date: Sun, 16 Nov 2014 17:23:35 +0000 Subject: [PATCH] 91_notify.pm: Hide the COMMAND entry. git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@7002 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- FHEM/91_notify.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/FHEM/91_notify.pm b/FHEM/91_notify.pm index ca98190ac..d73a66854 100755 --- a/FHEM/91_notify.pm +++ b/FHEM/91_notify.pm @@ -42,7 +42,7 @@ notify_Define($$) eval { "Hallo" =~ m/^$re$/ }; return "Bad regexp: $@" if($@); $hash->{REGEXP} = $re; - $hash->{COMMAND} = $command; + $hash->{".COMMAND"} = $command; $hash->{STATE} = "active"; notifyRegexpChanged($hash, $re); @@ -83,7 +83,7 @@ notify_Exec($$) "%TYPE" => $t, "%EVENT" => $s ); - my $exec = EvalSpecials($ntfy->{COMMAND}, %specials); + my $exec = EvalSpecials($ntfy->{".COMMAND"}, %specials); Log3 $ln, 4, "$ln exec $exec"; my $r = AnalyzeCommandChain(undef, $exec); @@ -140,7 +140,7 @@ notify_Set($@) eval { "Hallo" =~ m/^$re$/ }; return "Bad regexp: $@" if($@); $hash->{REGEXP} = $re; - $hash->{DEF} = "$re $hash->{COMMAND}"; + $hash->{DEF} = "$re ".$hash->{".COMMAND"}; notifyRegexpChanged($hash, $re); } elsif($cmd eq "removeRegexpPart") { @@ -154,7 +154,7 @@ notify_Set($@) eval { "Hallo" =~ m/^$re$/ }; return "Bad regexp: $@" if($@); $hash->{REGEXP} = $re; - $hash->{DEF} = "$re $hash->{COMMAND}"; + $hash->{DEF} = "$re ".$hash->{".COMMAND"}; notifyRegexpChanged($hash, $re); }