From 2217463c0f52280835bf508dd5b768bff56f2b65 Mon Sep 17 00:00:00 2001 From: Krzysztof Kosciuszkiewicz Date: Thu, 12 Jul 2007 03:36:26 +0200 Subject: Get rid of floats in scientific notation. Use 'showDigits n' instead of 'show . takeDigits n'. As this example shows explicit precision specifications would be appreciated ;) darcs-hash:20070712013626-ba08c-868a9d53ab1b8bc120d7c1a9634d3d8c7cb599d7.gz --- Plugins/Monitors/Weather.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Plugins/Monitors/Weather.hs') 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" -- cgit v1.2.3