From 61bab752f75ef538b844655f787b90bb0317e22d Mon Sep 17 00:00:00 2001
From: rudolfkoenig <>
Date: Tue, 11 Mar 2014 13:33:21 +0000
Subject: [PATCH] HttpUtils: method parameter from justme1968

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

diff --git a/fhem/FHEM/HttpUtils.pm b/fhem/FHEM/HttpUtils.pm
index 115da963e..b1351d2d8 100644
--- a/fhem/FHEM/HttpUtils.pm
+++ b/fhem/FHEM/HttpUtils.pm
@@ -184,7 +184,10 @@ HttpUtils_Connect2($)
   }
 
   $hash->{host} =~ s/:.*//;
-  my $hdr = ($data ? "POST" : "GET")." $hash->{path} HTTP/1.0\r\n";
+  my $method = $hash->{method};
+  $method = ($data ? "POST" : "GET") if( !$method );
+
+  my $hdr = "$method $hash->{path} HTTP/1.0\r\n";
   $hdr .= "Host: $hash->{host}\r\n";
   $hdr .= "Authorization: Basic $hash->{auth}\r\n" if(defined($hash->{auth}));
   $hdr .= $hash->{header}."\r\n" if(defined($hash->{header}));
@@ -295,7 +298,8 @@ HttpUtils_ParseAnswer($$)
 #  mandatory:
 #    url, callback
 #  optional(default):
-#    hideurl(0),timeout(4),data(""),noshutdown(0),loglevel(4),header("")
+#    hideurl(0),timeout(4),data(""),noshutdown(0),loglevel(4),header(""),
+#    method($data ? "POST" : "GET")
 # Example:
 #   HttpUtils_NonblockingGet({
 #     url=>"http://192.168.178.112:8888/fhem",