From 4c5b187804a4cd9f83f8df5ca70e862fc80c4fa9 Mon Sep 17 00:00:00 2001
From: "klaus.schauer" <>
Date: Mon, 27 Mar 2017 04:39:32 +0000
Subject: [PATCH] 10_EnOcean: windSpeed.00 and smokeDetector.02 changed

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

diff --git a/FHEM/10_EnOcean.pm b/FHEM/10_EnOcean.pm
index 83711c654..a51d9c8ff 100755
--- a/FHEM/10_EnOcean.pm
+++ b/FHEM/10_EnOcean.pm
@@ -1,6 +1,5 @@
 ##############################################
 # $Id$
-
 package main;
 
 use strict;
@@ -3069,8 +3068,8 @@ sub EnOcean_Set($@)
             return "Usage: $cmd [learn]" if ($a[1] ne "learn");
             if ($a[1] eq "learn") {
               $cmd = 'off';
-              $setCmd = $setCmd | 0x24;
-              readingsSingleUpdate($hash, "block", "lock", 1);
+              $setCmd = $setCmd | 0x28;
+              readingsSingleUpdate($hash, "block", "unlock", 1);
             }
             shift(@a);
           }
@@ -7032,11 +7031,11 @@ sub EnOcean_Parse($$)
 
     if ($st eq "FRW" || $st eq "smokeDetector.02") {
       # smoke detector
-      if (!exists($hash->{helper}{lastEvent}) || $hash->{helper}{lastEvent} != $db[0] || AttrVal($name, 'alarm', '') eq 'dead_sensor') {
+      if (!exists($hash->{helper}{lastEvent}) || $hash->{helper}{lastEvent} != $db[0] || ReadingsVal($name, 'alarm', '') eq 'dead_sensor') {
         if ($db[0] == 0x30) {
           push @event, "3:alarm:off";
           push @event, "3:battery:low";
-          $msg = AttrVal($name, 'state', 'off');
+          $msg = ReadingsVal($name, 'state', 'off');
         } elsif ($db[0] == 0x10) {
           push @event, "3:battery:ok";
           push @event, "3:alarm:smoke-alarm";
@@ -7055,11 +7054,11 @@ sub EnOcean_Parse($$)
 
     } elsif ($st eq "windSpeed.00") {
       # wind speed threshold detector
-      if (!exists($hash->{helper}{lastEvent}) || $hash->{helper}{lastEvent} != $db[0] || AttrVal($name, 'alarm', '') eq 'dead_sensor') {
+      if (!exists($hash->{helper}{lastEvent}) || $hash->{helper}{lastEvent} != $db[0] || ReadingsVal($name, 'alarm', '') eq 'dead_sensor') {
         push @event, "3:alarm:off";
         if ($db[0] == 0x30) {
           push @event, "3:battery:low";
-          $msg = AttrVal($name, 'state', 'off');
+          $msg = ReadingsVal($name, 'state', 'off');
         } elsif ($db[0] == 0x10) {
           push @event, "3:windSpeed:on";
           push @event, "3:battery:ok";