summaryrefslogtreecommitdiffhomepage
path: root/Plugins/Monitors/Weather.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Plugins/Monitors/Weather.hs')
-rw-r--r--Plugins/Monitors/Weather.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Plugins/Monitors/Weather.hs b/Plugins/Monitors/Weather.hs
index ec5606e..447ac2c 100644
--- a/Plugins/Monitors/Weather.hs
+++ b/Plugins/Monitors/Weather.hs
@@ -117,7 +117,7 @@ getData url=
formatWeather :: [WeatherInfo] -> Monitor String
formatWeather [(WI st ss y m d h w v sk temp dp r p)] =
do cel <- showWithColors show temp
- far <- showWithColors (show . takeDigits 1) (((9 / 5) * temp) + 32)
+ far <- showWithColors (showDigits 1) (((9 / 5) * temp) + 32)
rh <- showWithColors show r
parseTemplate [st, ss, y, m, d, h, w, v, sk, cel, far, dp, rh , p ]
formatWeather _ = return "N/A"