FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-04-08 13:24:56 +00:00
Code Issues Releases Wiki Activity

FRITZBOX: freetz bugfix

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@7377 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
tpoitzsch 2014-12-31 13:11:09 +00:00
parent a16d5984fd
commit 57c8383789
1 changed files with 8 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
fhem/FHEM/72_FRITZBOX.pm
View File

@ -1530,7 +1530,9 @@ FRITZBOX_Exec_Remote($$)
@output=$telnet->cmd($cmd);
$result = $output[0];
chomp $result;
FRITZBOX_Log $hash, 4, "Result '$result'";
my $log = join " ", @output;
chomp $log;
FRITZBOX_Log $hash, 4, "Result '$log'";
return $result;
}
elsif (ref \$cmd eq "REF")
@ -1546,8 +1548,11 @@ FRITZBOX_Exec_Remote($$)
unless ($_ =~ /^sleep/)
{
@output=$telnet->cmd($_);
$result = join(" ",@output);
$result =~ s/(\r\n|\n\r|\n|\r|\s)$//;
$result = $output[0];
chomp $result;
my $log = join " ", @output;
chomp $log;
FRITZBOX_Log $hash, 4, "Result '$log'";
}
else
{
@ -1556,7 +1561,6 @@ FRITZBOX_Exec_Remote($$)
$result = "";
}
push @resultArray, $result;
FRITZBOX_Log $hash, 5, "Result '$result'";
}
@{$cmd} = ();
FRITZBOX_Log $hash, 4, "Received ".int(@resultArray)." answer(s)";