FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-10 09:16:53 +00:00
Code Issues Releases Wiki Activity

contrib/98_openweathermap.pm: remove log entries from HttpUtils

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@9696 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
betateilchen 2015-10-26 22:21:32 +00:00
parent 0dbd7fe823
commit ea16a9d1cd
1 changed files with 3 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
fhem/contrib/98_openweathermap.pm
View File

@ -67,6 +67,7 @@
# 2015-10-26 added: support for stationByZip # 2015-10-26 added: support for stationByZip
# modi: use HttpUtils instead of LWP::UA # modi: use HttpUtils instead of LWP::UA
# for nonblocking http # for nonblocking http
# modi: attribute owoProxy for proxy configuration
# #
package main; package main;
@ -316,8 +317,7 @@ sub OWO_GetStatus($;$){
my $sendString = $urlString."?".$dataString; my $sendString = $urlString."?".$dataString;
if(AttrVal($name, "owoDebug",1) == 0){ if(AttrVal($name, "owoDebug",1) == 0){
Log3($name, 4, "owo $name: sending: $dataString"); Log3($name, 4, "owo $name: sending: $dataString");
my $ll = AttrVal($name,'verbose',2); $htmlDummy = GetFileFromURLQuiet($sendString,10,1,0,0);
$htmlDummy = GetFileFromURLQuiet($sendString,10,1,0,$ll);
$htmlDummy //= "no answer"; $htmlDummy //= "no answer";
Log3($name, 3, "owo $name: htmlResponse: ".$htmlDummy); #->status_line); Log3($name, 3, "owo $name: htmlResponse: ".$htmlDummy); #->status_line);
} else { } else {
@ -403,8 +403,7 @@ sub UpdateReadings($$$){
$url .= "&mode=xml" if($xmlMode eq "1"); $url .= "&mode=xml" if($xmlMode eq "1");
$url .= "&APPID=".AttrVal($name, "owoApiKey", ""); $url .= "&APPID=".AttrVal($name, "owoApiKey", "");
my $ll = AttrVal($name,'verbose',2); $response = GetFileFromURLQuiet($url,10,1,0,0);
$response = GetFileFromURLQuiet($url,10,1,0,$ll);
if(defined($response)){ if(defined($response)){
if(AttrVal($name, "owoDebug", 1) == 1){ if(AttrVal($name, "owoDebug", 1) == 1){