diff options
| -rw-r--r-- | Monitors/Weather.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Monitors/Weather.hs b/Monitors/Weather.hs index 659c4ea..994227e 100644 --- a/Monitors/Weather.hs +++ b/Monitors/Weather.hs @@ -36,7 +36,7 @@ data WeatherInfo = Fail String } instance Show WeatherInfo where - show (Fail x) = "N/A " ++ x + show (Fail _) = "N/A" show (WI st t temp rh) = st ++ ": " ++ (formatWeather temp) ++ "C, rh " ++ formatWeather rh ++ "% (" ++ t ++ ")" |