From e92c735d4d9b936da30186544a3ffa565bd25c54 Mon Sep 17 00:00:00 2001
From: rudolfkoenig <>
Date: Mon, 30 Apr 2012 07:23:43 +0000
Subject: [PATCH] shutdown added to client code to avoid hangs

git-svn-id: https://svn.fhem.de/fhem/trunk@1508 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/fhem.pl | 1 +
 1 file changed, 1 insertion(+)

diff --git a/fhem/fhem.pl b/fhem/fhem.pl
index ab37ad6f4..547414b22 100755
--- a/fhem/fhem.pl
+++ b/fhem/fhem.pl
@@ -294,6 +294,7 @@ if(int(@ARGV) == 2) {
   $server = IO::Socket::INET->new(PeerAddr => $addr);
   die "Can't connect to $addr\n" if(!$server);
   syswrite($server, "$ARGV[1] ; quit\n");
+  shutdown($server, 1);
   while(sysread($server, $buf, 256) > 0) {
     print($buf);
   }