From 3f9a9a914ab38bb65a91be18317447b97a67d753 Mon Sep 17 00:00:00 2001
From: deespe <>
Date: Sat, 27 Aug 2016 02:36:33 +0000
Subject: [PATCH] 98_Hyperion: copy old reading into new reading before
 deleting it

git-svn-id: https://svn.fhem.de/fhem/trunk@12076 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/98_Hyperion.pm | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/fhem/FHEM/98_Hyperion.pm b/fhem/FHEM/98_Hyperion.pm
index 7f74ac75d..b36116c68 100644
--- a/fhem/FHEM/98_Hyperion.pm
+++ b/fhem/FHEM/98_Hyperion.pm
@@ -219,8 +219,13 @@ sub Hyperion_Read($)
   elsif ($1 =~ /^.+\},"success":true\}$/)
   {
     ######################
-    # delete old reading #
-    fhem "deletereading $name previous_mode" if (defined(ReadingsVal($name,"previous_mode",undef)));
+    if (defined(ReadingsVal($name,"previous_mode",undef)))
+    {
+      # set new reading to former value
+      fhem "setreading $name mode_before_off ".ReadingsVal($name,"previous_mode","");
+      # delete old reading
+      fhem "deletereading $name previous_mode";
+    }
     ######################
     my $obj         = eval {from_json($result)};
     my $data        = $obj->{info};