From 7f2a04a89f9bbc00719d95fb2edbcd9419823658 Mon Sep 17 00:00:00 2001
From: loredo <loredo@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Wed, 25 Dec 2013 23:23:24 +0000
Subject: [PATCH] ENIGMA2: do HTTP POST and HTTP GET in parallel to support old
 WebIf versions

git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@4460 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/70_ENIGMA2.pm | 13 ++++++++++---
 1 file changed, 10 insertions(+), 3 deletions(-)

diff --git a/fhem/FHEM/70_ENIGMA2.pm b/fhem/FHEM/70_ENIGMA2.pm
index 4c50238ba..b01013611 100644
--- a/fhem/FHEM/70_ENIGMA2.pm
+++ b/fhem/FHEM/70_ENIGMA2.pm
@@ -1560,6 +1560,7 @@ sub ENIGMA2_SendCommand($$;$) {
     }
     else {
         Log3 $name, 4, "ENIGMA2 $name: REQ $service/" . urlDecode($cmd);
+        $cmd = "?" . $cmd;
     }
 
     if ( defined($http_user) && defined($http_passwd) ) {
@@ -1569,7 +1570,8 @@ sub ENIGMA2_SendCommand($$;$) {
           . $http_passwd . "@"
           . $address . ":"
           . $port . "/web/"
-          . $service;
+          . $service
+          . $cmd;
     }
     elsif ( defined($http_user) ) {
         $URL =
@@ -1577,11 +1579,16 @@ sub ENIGMA2_SendCommand($$;$) {
           . $http_user . "@"
           . $address . ":"
           . $port . "/web/"
-          . $service;
+          . $service
+          . $cmd;
     }
     else {
         $URL =
-          $http_proto . "://" . $address . ":" . $port . "/web/" . $service;
+            $http_proto . "://"
+          . $address . ":"
+          . $port . "/web/"
+          . $service
+          . $cmd;
     }
 
     Log3 $name, 5, "ENIGMA2 $name: GET " . urlDecode($URL);