From 9fa9ef0c9992c08162537f5c6d73d7e23b30088b Mon Sep 17 00:00:00 2001 From: nasseeder1 Date: Sat, 27 Jan 2024 19:56:30 +0000 Subject: [PATCH] 76_SolarForecast: Setter writeHistory replaced by operatingMemory save, backup and recover in-memory operating data git-svn-id: https://svn.fhem.de/fhem/trunk@28434 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/76_SolarForecast.pm | 10 ++-------- fhem/contrib/DS_Starter/76_SolarForecast.pm | 10 ++-------- 2 files changed, 4 insertions(+), 16 deletions(-) diff --git a/fhem/FHEM/76_SolarForecast.pm b/fhem/FHEM/76_SolarForecast.pm index be5b2cab0..351bba245 100644 --- a/fhem/FHEM/76_SolarForecast.pm +++ b/fhem/FHEM/76_SolarForecast.pm @@ -915,7 +915,7 @@ sub Initialize { "ctrlAIdataStorageDuration ". "ctrlAutoRefresh:selectnumbers,120,0.2,1800,0,log10 ". "ctrlAutoRefreshFW:$fwd ". - "ctrlBackupFilesKeep:select,1,2,3,4,5,6,7,8,9,10 ". + "ctrlBackupFilesKeep ". "ctrlBatSocManagement:textField-long ". "ctrlConsRecommendReadings:multiple-strict,$allcs ". "ctrlDebug:multiple-strict,$dm,#14 ". @@ -4253,13 +4253,7 @@ sub Attr { } if ($cmd eq 'set') { - if ($aName eq 'ctrlInterval') { - unless ($aVal =~ /^[0-9]+$/x) { - return qq{The value for $aName is not valid. Use only figures 0-9 !}; - } - } - - if ($aName eq 'ctrlAIdataStorageDuration') { + if ($aName eq 'ctrlInterval' || $aName eq 'ctrlBackupFilesKeep' || $aName eq 'ctrlAIdataStorageDuration') { unless ($aVal =~ /^[0-9]+$/x) { return qq{The value for $aName is not valid. Use only figures 0-9 !}; } diff --git a/fhem/contrib/DS_Starter/76_SolarForecast.pm b/fhem/contrib/DS_Starter/76_SolarForecast.pm index be5b2cab0..351bba245 100644 --- a/fhem/contrib/DS_Starter/76_SolarForecast.pm +++ b/fhem/contrib/DS_Starter/76_SolarForecast.pm @@ -915,7 +915,7 @@ sub Initialize { "ctrlAIdataStorageDuration ". "ctrlAutoRefresh:selectnumbers,120,0.2,1800,0,log10 ". "ctrlAutoRefreshFW:$fwd ". - "ctrlBackupFilesKeep:select,1,2,3,4,5,6,7,8,9,10 ". + "ctrlBackupFilesKeep ". "ctrlBatSocManagement:textField-long ". "ctrlConsRecommendReadings:multiple-strict,$allcs ". "ctrlDebug:multiple-strict,$dm,#14 ". @@ -4253,13 +4253,7 @@ sub Attr { } if ($cmd eq 'set') { - if ($aName eq 'ctrlInterval') { - unless ($aVal =~ /^[0-9]+$/x) { - return qq{The value for $aName is not valid. Use only figures 0-9 !}; - } - } - - if ($aName eq 'ctrlAIdataStorageDuration') { + if ($aName eq 'ctrlInterval' || $aName eq 'ctrlBackupFilesKeep' || $aName eq 'ctrlAIdataStorageDuration') { unless ($aVal =~ /^[0-9]+$/x) { return qq{The value for $aName is not valid. Use only figures 0-9 !}; }