From 885d68d66b4bf7d59a964c1fccfd14db671d0099 Mon Sep 17 00:00:00 2001
From: rudolfkoenig <>
Date: Sun, 6 Feb 2022 13:08:44 +0000
Subject: [PATCH] 01_FHEMWEB.pm: fix bogus internal data in websocket (Forum
 #125866)

git-svn-id: https://svn.fhem.de/fhem/trunk@25637 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/01_FHEMWEB.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/fhem/FHEM/01_FHEMWEB.pm b/fhem/FHEM/01_FHEMWEB.pm
index 4a6fa1d0b..2ba277dd8 100644
--- a/fhem/FHEM/01_FHEMWEB.pm
+++ b/fhem/FHEM/01_FHEMWEB.pm
@@ -617,7 +617,7 @@ FW_finishRead($$$)
       $FW_httpheader{"Accept-Encoding"} =~ m/gzip/) &&
      $FW_use{zlib}) {
     utf8::encode($FW_RET)
-        if(utf8::is_utf8($FW_RET) && $FW_RET =~ m/[^\x00-\xFF]/ );
+        if(utf8::is_utf8($FW_RET) || $FW_RET =~ m/[^\x00-\xFF]/ );
     eval { $FW_RET = Compress::Zlib::memGzip($FW_RET); };
     if($@) {
       Log 1, "memGzip: $@"; $FW_RET=""; #Forum #29939
@@ -715,7 +715,7 @@ FW_addToWritebuffer($$@)
 {
   my ($hash, $txt, $callback, $nolimit) = @_;
 
-  utf8::encode($txt) if(utf8::is_utf8($txt) && $txt =~ m/[^\x00-\xFF]/ );
+  utf8::encode($txt) if(utf8::is_utf8($txt) || $txt =~ m/[^\x00-\xFF]/ );
   if( $hash->{websocket} ) {
     my $len = length($txt);
     if( $len < 126 ) {