From 5b56c5439bcf04ea90272a80c4a98417fcb5da36 Mon Sep 17 00:00:00 2001 From: tobiasfaust Date: Wed, 29 Jul 2015 18:39:12 +0000 Subject: [PATCH] 98_Text2speech.pm: bugfix google download git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@9003 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/98_Text2Speech.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/fhem/FHEM/98_Text2Speech.pm b/fhem/FHEM/98_Text2Speech.pm index a80d3b40b..eee6c7e73 100644 --- a/fhem/FHEM/98_Text2Speech.pm +++ b/fhem/FHEM/98_Text2Speech.pm @@ -569,8 +569,8 @@ sub Text2Speech_Download($$$) { my $fh; my $TTS_Language = AttrVal($hash->{NAME}, "TTS_Language", "Deutsch"); - Log3 $hash->{NAME}, 4, "Text2Speech: Hole URL: ". "http://" . $ttsHost . $ttsPath . $ttsLang . $language{$TTS_Language} . "&" . $ttsQuery . uri_escape($text); - $HttpResponse = GetHttpFile($ttsHost, $ttsPath . $ttsLang . $language{$TTS_Language} . "&" . $ttsQuery . uri_escape($text)); + Log3 $hash->{NAME}, 4, "Text2Speech: Hole URL: ". "http://" . $ttsHost . $ttsPath . $ttsLang . $language{$TTS_Language} . "&client=t&prev=input&" . $ttsQuery . uri_escape($text); + $HttpResponse = GetHttpFile($ttsHost, $ttsPath . $ttsLang . $language{$TTS_Language} . "&client=t&prev=input&" . $ttsQuery . uri_escape($text)); $fh = new IO::File ">$file"; if(!defined($fh)) {