From b3d376cd9075043f29a6a79f8583b157e00bc444 Mon Sep 17 00:00:00 2001 From: rudolfkoenig Date: Sat, 21 Jul 2012 13:13:55 +0000 Subject: [PATCH] ^D (EOF) kills fhem git-svn-id: https://svn.fhem.de/fhem/trunk@1749 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/98_telnet.pm | 12 ++++++++++-- 1 file changed, 10 insertions(+), 2 deletions(-) diff --git a/fhem/FHEM/98_telnet.pm b/fhem/FHEM/98_telnet.pm index 4d2826bc1..0b0bad45c 100644 --- a/fhem/FHEM/98_telnet.pm +++ b/fhem/FHEM/98_telnet.pm @@ -56,7 +56,15 @@ telnet_Define($$$) return "Usage: define telnet [IPV6:] [global]" if($port !~ m/^(IPV6:)?\d+$/ || ($global && $global ne "global")); - return TcpServer_Open($hash, $port, $global); + my $ret = TcpServer_Open($hash, $port, $global); + + # Make sure that fhem only runs once + if($ret && !$init_done) { + Log 1, "$ret. Exiting."; + exit(1); + } + return $ret; + } sub @@ -94,7 +102,7 @@ telnet_Read($) } if(ord($buf) == 4) { # EOT / ^D CommandQuit($hash, ""); - next; + return; } $buf =~ s/\r//g;