diff --git a/fhem/CHANGED b/fhem/CHANGED index 5b35b2e03..3ee83b4c0 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: 11_OWDevice: replaced deprecated smartmatch - feature: 76_SolarForecast: Version 1.59.5 - bugfix: 73_NUKIBridge: Refactor command handler return logic for clarity - bugfix: 59_Weather: This commit addresses several issues with conditionals diff --git a/fhem/FHEM/11_OWDevice.pm b/fhem/FHEM/11_OWDevice.pm index 2e13f8de9..a8d15117f 100644 --- a/fhem/FHEM/11_OWDevice.pm +++ b/fhem/FHEM/11_OWDevice.pm @@ -27,7 +27,6 @@ package main; use strict; use warnings; -no if $] >= 5.017011, warnings => 'experimental::smartmatch'; use vars qw(%owdevice); @@ -598,7 +597,7 @@ OWDevice_Get($@) return "get $name needs one argument" if(int(@a) != 2); my $cmdname= $a[1]; my @getters= @{$hash->{fhem}{getters}}; - if($cmdname ~~ @getters) { + if(main::contains_string($cmdname, @getters)) { my $value= OWDevice_ReadValue($hash, $cmdname); readingsSingleUpdate($hash,$cmdname,$value,1); return $value; @@ -617,7 +616,7 @@ OWDevice_Set($@) my $cmdname= $a[1]; my $value= $a[2]; my @setters= @{$hash->{fhem}{setters}}; - if($cmdname ~~ @setters) { + if(main::contains_string($cmdname, @setters)) { # LCD Display need more than two arguments, to display text # added by m.fischer if($cmdname =~ /(line16.0|line16.1|line16.2|line16.3|screen16)/ ||