From ddb300e68c7d448d876bb451453a0fafbea4d11f Mon Sep 17 00:00:00 2001
From: choenig <>
Date: Mon, 10 Aug 2020 12:37:10 +0000
Subject: [PATCH] 10_WS980: change conversion ration of w/m2 to 0.0079

git-svn-id: https://svn.fhem.de/fhem/trunk@22571 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/CHANGED          | 1 +
 fhem/FHEM/10_WS980.pm | 4 ++--
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/fhem/CHANGED b/fhem/CHANGED
index 5b890feed..25338b472 100644
--- a/fhem/CHANGED
+++ b/fhem/CHANGED
@@ -1,5 +1,6 @@
 # Add changes at the top of the list. Keep it in ASCII, and 80-char wide.
 # Do not insert empty lines here, update check depends on it.
+ - change:  10_WS980: change conversion ration of w/m2 to 0.0079
 .- bugfix:  98_DOIFtools: improve popup position (Forum #113404)
  - bugfix:  48_BlinkCamera: videoDelete on new API and first TFA pin verify
  - bugfix:  73_AutoShuttersControl: fix shading in drive then shutter is closed
diff --git a/fhem/FHEM/10_WS980.pm b/fhem/FHEM/10_WS980.pm
index 6de8716e8..0b19545a7 100644
--- a/fhem/FHEM/10_WS980.pm
+++ b/fhem/FHEM/10_WS980.pm
@@ -33,7 +33,7 @@ use warnings;
 use IO::Socket::INET;
 use POSIX qw(strftime);
 
-my $version = "1.1.1";
+my $version = "1.2.0";
 
 #------------------------------------------------------------------------------------------------------
 # global constants
@@ -138,7 +138,7 @@ use constant UNIT_CONVERSIONS => {
 		"fnc"  => {
 			"lux"   => sub { my ($c) = @_; return $c },
 			"fc"    => sub { my ($c) = @_; return $c * 0.09290304000008},
-			"w/m^2" => sub { my ($c) = @_; return $c * 0.001464128843338},
+			"w/m^2" => sub { my ($c) = @_; return $c * 0.0079},  # 0.001464128843338 @ 555nm
 		},
 	},
 };