From 19f7847b01cb864079551c0da36c641e32ea72a0 Mon Sep 17 00:00:00 2001
From: rudolfkoenig <>
Date: Sat, 23 Mar 2019 12:37:20 +0000
Subject: [PATCH] AttrTemplate.pm: add farewell, fix \DEVICE in par (Forum
 #97989)

git-svn-id: https://svn.fhem.de/fhem/trunk@19002 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/AttrTemplate.pm | 21 +++++++++++++++++++--
 1 file changed, 19 insertions(+), 2 deletions(-)

diff --git a/fhem/FHEM/AttrTemplate.pm b/fhem/FHEM/AttrTemplate.pm
index 46ac642d6..a3a49fc5d 100644
--- a/fhem/FHEM/AttrTemplate.pm
+++ b/fhem/FHEM/AttrTemplate.pm
@@ -52,6 +52,9 @@ AttrTemplate_Initialize()
       } elsif($line =~ m/^desc:(.*)/) {
         $templates{$name}{desc} = $1;
 
+      } elsif($line =~ m/^farewell:(.*)/) {
+        $templates{$name}{farewell} = $1;
+
       } else {
         push(@{$templates{$name}{cmds}}, $line);
 
@@ -128,7 +131,8 @@ AttrTemplate_Set($$@)
     }
 
     if($perl_code) {
-      $perl_code =~ s/DEVICE/$name/g;
+      $perl_code =~ s/(?<!\\)DEVICE/$name/g;
+      $perl_code =~ s/\\DEVICE/DEVICE/g;
       my $ret = eval $perl_code;
       return "Error checking template regexp: $@" if($@);
       if($ret) {
@@ -186,7 +190,20 @@ AttrTemplate_Set($$@)
       $cmd = "";
     }
   } split("\n", $cmdlist);
-  return @ret ? join("\n", @ret) : undef;
+
+  return join("\n", @ret) if(@ret);
+
+  if($h->{farewell}) {
+    my $fw = $h->{farewell};
+    if(!$cl || $cl->{TYPE} ne "FHEMWEB") {
+      $fw =~ s/<br>/\n/gi;
+      $fw =~ s/<[^>]+>//g;      # remove html tags
+    }
+    return $fw if(!$cl);
+    InternalTimer(gettimeofday()+1, sub{asyncOutput($cl, $fw)}, undef, 0);
+  }
+  return undef;
+
 }
 
 1;