FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-01-31 18:59:33 +00:00
Code Issues Releases Wiki Activity

98_telnet.pm: using original version of the patch (Forum #54205)

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@11606 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2016-06-03 18:43:06 +00:00
parent 846533e8fb
commit 991944b53f
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
fhem/FHEM/98_telnet.pm
View File

@ -195,12 +195,12 @@ telnet_Read($)
$chash->{canAsyncOutput} = 1;
$chash->{encoding} = AttrVal($name, "encoding", "utf8");
$chash->{prompt} = AttrVal($name, "prompt",
AttrVal('global','title','fhem>'));
AttrVal('global','title','fhem'));
if($chash->{prompt} =~ m/^{.*}$/s) {
$chash->{prompt} = eval $chash->{prompt};
$chash->{prompt} =~ s/\n//;
$chash->{prompt} .= '>'; # Not really nice, but dont know better.
$chash->{prompt} = eval $chash->{prompt};
$chash->{prompt} =~ s/\n//;
}
$chash->{prompt} .= '>'; # Not really nice, but dont know better.
syswrite($chash->{CD}, sprintf("%c%c%c", 255, 253, 0) )
if( AttrVal($name, "encoding", "") ); #DO BINARY
$chash->{CD}->flush();