From 222379d54e3defd3479d56996f77208e5e344b97 Mon Sep 17 00:00:00 2001 From: Marko Oldenburg Date: Mon, 3 Jul 2017 18:37:22 +0200 Subject: [PATCH] fix Umlaute Problem bei voiceInput --- 73_AMADCommBridge.pm | 382 ++++++------------------------------------- 74_AMADDevice.pm | 4 +- 2 files changed, 50 insertions(+), 336 deletions(-) diff --git a/73_AMADCommBridge.pm b/73_AMADCommBridge.pm index b947e46..54ff1eb 100644 --- a/73_AMADCommBridge.pm +++ b/73_AMADCommBridge.pm @@ -65,10 +65,12 @@ use warnings; use HttpUtils; use TcpServerUtils; + +eval "use Encode qw(encode encode_utf8);1" or $missingModul .= "Encode "; eval "use JSON;1" or $missingModul .= "JSON "; -my $modulversion = "3.9.75"; +my $modulversion = "3.9.77"; my $flowsetversion = "3.9.76"; @@ -713,11 +715,9 @@ sub AMADCommBridge_ResponseProcessing($$) { my $response; my $c; - my $decode_json; - - $decode_json = eval{decode_json($json)}; - + + my $decode_json = eval{decode_json($json)}; if($@){ Log3 $bname, 4, "AMADCommBridge ($name) - ERROR while request: $@"; @@ -811,7 +811,7 @@ sub AMADCommBridge_ResponseProcessing($$) { } elsif ( $fhemcmd eq 'voiceinputvalue' ) { - my $fhemCmd = lc($decode_json->{payload}{voiceinputdata}); + my $fhemCmd = lc(encode_utf8($decode_json->{payload}{voiceinputdata})); readingsBeginUpdate( $bhash); readingsBulkUpdate( $bhash, "receiveVoiceCommand", $fhemCmd, 1 ); @@ -971,175 +971,7 @@ sub AMADCommBridge_ParseMsg($$) {

AMADCommBridge

- +comming soon =end html =begin html_DE @@ -1147,177 +979,59 @@ sub AMADCommBridge_ParseMsg($$) {

AMADCommBridge

-
- AMAD Communication Bridge -
- NUN bitte die Flows AKTIVIEREN!!!
-
- Fertig! Nach anlegen der Geräteinstanz und dem eintragen der fhemServerIP in der CommBridge sollten nach spätestens 15 Sekunden bereits die ersten Readings reinkommen. Nun wird alle 15 Sekunden probiert einen Status Request erfolgreich ab zu schließen. Wenn der Status sich über einen längeren Zeitraum nicht auf "active" ändert, sollte man im Log nach eventuellen Fehlern suchen. -


- +

+ Readings - -

- - Set - -
- Set abhängig von gesetzten Attributen - -

- - state - -


- Anwendungsbeispiele: -


+

+ + Attribute + +

+ Wie man bei Problemen mit dem Assistenten ein Androidgerät auch von Hand anlegen kann, erfärst Du in der Commandref zum AMADDevice Modul. =end html_DE diff --git a/74_AMADDevice.pm b/74_AMADDevice.pm index bb27e43..7c44f89 100644 --- a/74_AMADDevice.pm +++ b/74_AMADDevice.pm @@ -54,7 +54,7 @@ eval "use Encode qw(encode encode_utf8);1" or $missingModul .= "Encode "; eval "use JSON;1" or $missingModul .= "JSON "; -my $modulversion = "3.9.73"; +my $modulversion = "3.9.76"; my $flowsetversion = "3.9.76"; @@ -762,7 +762,7 @@ sub AMADDevice_Parse($$) { my $name = $io_hash->{NAME}; - my $decode_json = eval{decode_json(encode_utf8($json))}; + my $decode_json = eval{decode_json(encode_utf8($json))}; if($@){ Log3 $name, 3, "AMADDevice ($name) - error while request: $@"; #readingsSingleUpdate($hash, "state", "error", 1);