From 154271db98f25d31c7fb623667db78030df8da30 Mon Sep 17 00:00:00 2001
From: rudolfkoenig <rudolfkoenig@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Sat, 16 Dec 2017 15:20:04 +0000
Subject: [PATCH] FHEM/HttpUtils.pm: remove buf (Forum #81099)

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

diff --git a/fhem/FHEM/HttpUtils.pm b/fhem/FHEM/HttpUtils.pm
index 4e1200001..11f12a114 100644
--- a/fhem/FHEM/HttpUtils.pm
+++ b/fhem/FHEM/HttpUtils.pm
@@ -615,7 +615,6 @@ sub
 HttpUtils_DataComplete($)
 {
   my ($hash) = @_;
-  my ($hdr, $data) = ($1, $2);
   my $hl = $hash->{httpdatalen};
   if(!defined($hl)) {
     return 0 if($hash->{buf} !~ m/^(.*?)\r?\n\r?\n(.*)$/s);
@@ -744,8 +743,11 @@ HttpUtils_ParseAnswer($)
     if($hash->{buf} =~ m/^(HTTP.*?)\r?\n\r?\n(.*)$/s) {
       $hash->{httpheader} = $1;
       $hash->{httpdata} = $2;
+      delete($hash->{buf});
     } else {
-      return ("", $hash->{buf});
+      my $ret = $hash->{buf};
+      delete($hash->{buf});
+      return ("", $ret);
     }
   }
   my $ret = $hash->{httpdata};