From 6b267f1605c9a00784b101ba41ab7ed68d2f2c61 Mon Sep 17 00:00:00 2001
From: jamesgo <jamesgo@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Thu, 28 Feb 2019 07:33:51 +0000
Subject: [PATCH] 98_GAEBUS.pm : fix hardcoded port in OpenDev

git-svn-id: https://svn.fhem.de/fhem/trunk@18757 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/98_GAEBUS.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/fhem/FHEM/98_GAEBUS.pm b/fhem/FHEM/98_GAEBUS.pm
index 480a1b68b..4db6886f9 100644
--- a/fhem/FHEM/98_GAEBUS.pm
+++ b/fhem/FHEM/98_GAEBUS.pm
@@ -46,6 +46,7 @@
 # 13.12.2017 : A.Goebel : add "+f" as additional ebus command to disable "-f" for this request
 # 03.01.2019 : A.Goebel : fix mask tilde in set/get
 # 03.01.2019 : A.Goebel : fix change regexp for parsing commands from "/^w$delimiter.{1,7}$delimiter.*/" to "/^w$delimiter[^$delimiter]{1,}$delimiter.*/" to support "feuerung" as class
+# 28.02.2019 : A.Goebel : fix port 8888 was hardcoded in GAEBUS_OpenDev, use $port instead (highlighted by user freetz)
 
 package main;
 
@@ -630,7 +631,7 @@ GAEBUS_OpenDev($$)
 
   my $conn = new IO::Socket::INET (
 	PeerAddr => "$host",
-	PeerPort => '8888',
+	PeerPort => "$port",
 	Proto    => 'tcp',
 	Reuse    => 0,
 	Timeout  => 10