diff options
Diffstat (limited to 'Plugins/Monitors')
| -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" | 
