74_NUKIDevice: Add UTF-8 encoding for reading bulk updates
git-svn-id: https://svn.fhem.de/fhem/trunk@30395 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
@@ -1,5 +1,6 @@
|
|||||||
# Add changes at the top of the list. Keep it in ASCII, and 80-char wide.
|
# 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
|
# Do not insert empty lines here, update check depends on it
|
||||||
|
- change: 74_NUKIDevice: Add UTF-8 encoding for reading bulk updates
|
||||||
- change: 73_NUKIBridge/74_NUKIDevice: Key changes include enhancements to the
|
- change: 73_NUKIBridge/74_NUKIDevice: Key changes include enhancements to the
|
||||||
command handling within the Bridge module, replacing
|
command handling within the Bridge module, replacing
|
||||||
the `given/when` construct with a more flexible
|
the `given/when` construct with a more flexible
|
||||||
|
|||||||
@@ -271,7 +271,7 @@ sub Initialize {
|
|||||||
],
|
],
|
||||||
"release_status": "stable",
|
"release_status": "stable",
|
||||||
"license": "GPL_2",
|
"license": "GPL_2",
|
||||||
"version": "v2.1.0",
|
"version": "v2.1.1",
|
||||||
"author": [
|
"author": [
|
||||||
"Marko Oldenburg <leongaultier@gmail.com>"
|
"Marko Oldenburg <leongaultier@gmail.com>"
|
||||||
],
|
],
|
||||||
|
|||||||
@@ -30,7 +30,7 @@ use strict;
|
|||||||
use warnings;
|
use warnings;
|
||||||
|
|
||||||
#use experimental qw( switch );
|
#use experimental qw( switch );
|
||||||
|
use Encode;
|
||||||
use FHEM::Meta;
|
use FHEM::Meta;
|
||||||
|
|
||||||
use GPUtils qw(GP_Import);
|
use GPUtils qw(GP_Import);
|
||||||
@@ -550,7 +550,8 @@ sub WriteReadings {
|
|||||||
while ( ( $t, $v ) = each %{$decode_json} ) {
|
while ( ( $t, $v ) = each %{$decode_json} ) {
|
||||||
|
|
||||||
# generische readings (alles außer spezielle Felder)
|
# generische readings (alles außer spezielle Felder)
|
||||||
::readingsBulkUpdate( $hash, $t, $v )
|
::readingsBulkUpdate( $hash, $t,
|
||||||
|
Encode::is_utf8($v) ? Encode::encode( "UTF-8", $v ) : $v )
|
||||||
if ( $t ne 'state'
|
if ( $t ne 'state'
|
||||||
&& $t ne 'mode'
|
&& $t ne 'mode'
|
||||||
&& $t ne 'deviceType'
|
&& $t ne 'deviceType'
|
||||||
|
|||||||
Reference in New Issue
Block a user