Merge pull request #350 from mstovenour/fix_issue_349

Fix issue #349: internet_weather.pl negative temp
hollie · Jan 3, 2014 · a58c804 · a58c804
2 parents eb5ece3 + b56332f
commit a58c804
Showing 1 changed file with 4 additions and 4 deletions.
diff --git a/code/common/internet_weather.pl b/code/common/internet_weather.pl
@@ -101,9 +101,9 @@ sub normalize_conditions {
  $forecast = read_all $f_weather_forecast;
 
  if (length($forecast) < 50) {
- respond "app=weather Last weather forecast received was incomplete."
+ respond("app=weather Last weather forecast received was incomplete.");
  } else {
- respond "app=weather $forecast";
+ respond("app=weather $forecast");
  }
 }
 
@@ -113,7 +113,7 @@ sub normalize_conditions {
  $conditions = read_all $f_weather_conditions;
  $conditions = normalize_conditions($conditions);
 
- respond "app=weather $conditions";
+ respond("app=weather $conditions");
 }
 
 if (done_now $p_weather_forecast) {
@@ -140,7 +140,7 @@ sub normalize_conditions {
 
  $conditions = normalize_conditions($conditions);
 
- $w{TempOutdoor} = $1 if $conditions =~ /(\d+) degrees/i;
+ $w{TempOutdoor} = $1 if $conditions =~ /(-?\d+) degrees/i;
  if ($conditions =~ /(\d+)\%/) {
  $w{HumidOutdoor} = $1;
  $w{HumidOutdoorMeasured}=1; # tell Weather_Common that we directly measured humidity