diff options
Diffstat (limited to 'Plugins/Monitors/Weather.hs')
| -rw-r--r-- | Plugins/Monitors/Weather.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/Plugins/Monitors/Weather.hs b/Plugins/Monitors/Weather.hs index 9a60876..15d084e 100644 --- a/Plugins/Monitors/Weather.hs +++ b/Plugins/Monitors/Weather.hs @@ -16,6 +16,7 @@ module Plugins.Monitors.Weather where import Plugins.Monitors.Common +import Control.Monad (when) import System.Process import System.Exit import System.IO @@ -120,6 +121,8 @@ getData url= hClose e case exit of ExitSuccess -> do str <- hGetContents o + when (str == str) $ return () + closeHandles return str _ -> do closeHandles return "Could not retrieve data" |