From b223349a540440d73ee5d866531310c0dd31035c Mon Sep 17 00:00:00 2001
From: betateilchen <betateilchen@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Fri, 28 Feb 2014 09:53:37 +0000
Subject: [PATCH] 71_LISTENLIVE - Changed - Make presence TEMPORARY

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

diff --git a/fhem/FHEM/71_LISTENLIVE.pm b/fhem/FHEM/71_LISTENLIVE.pm
index 2194c29c8..e59e0c7a0 100644
--- a/fhem/FHEM/71_LISTENLIVE.pm
+++ b/fhem/FHEM/71_LISTENLIVE.pm
@@ -74,6 +74,9 @@
 #				Added:		ShutdownFn
 #				Changed:	Undef will delete presence, too
 #
+#	2014-02-28
+#				Changed:	Make presence entities TEMPORARY
+#
 ##############################################################################
 
 package main;
@@ -196,15 +199,18 @@ sub LISTENLIVE_Define($$) {
 
 	if($address[0] ne "none"){
 		# PRESENCE aus device pres_+NAME lesen
+		my $pres_name;
 		$presence = ReadingsVal("pres_".$name,"state","noPresence");
 	
 		if($presence eq "noPresence"){
-			$cmd = "pres_$name PRESENCE lan-ping $address[0]";
+			$pres_name = "pres_".$name;
+			$cmd = "$pres_name PRESENCE lan-ping $address[0]";
 			$ret = CommandDefine(undef, $cmd);
 			if($ret){
 				Log3($name, 2, "LISTENLIVE ERROR $ret");
 			} else {
-				Log3($name, 3, "LISTENLIVE $name PRESENCE pres_$name created.");
+				Log3($name, 3, "LISTENLIVE $name PRESENCE $pres_name created.");
+				$defs{$pres_name}{TEMPORARY} = 1;
 			}
 		} else {
 			Log3($name, 3, "LISTENLIVE $name PRESENCE pres_$name found.");