diff options
Diffstat (limited to 'Plugins')
| -rw-r--r-- | Plugins/Monitors/Common.hs | 3 | 
1 files changed, 2 insertions, 1 deletions
| diff --git a/Plugins/Monitors/Common.hs b/Plugins/Monitors/Common.hs index d6066d6..03b40d8 100644 --- a/Plugins/Monitors/Common.hs +++ b/Plugins/Monitors/Common.hs @@ -55,6 +55,7 @@ import Data.List  import Numeric  import Text.ParserCombinators.Parsec  import System.Console.GetOpt +import Control.Exception (handle)  import Plugins  -- $monitor @@ -148,7 +149,7 @@ runM args conf action r cb = do go      where go = do              c <- conf              let ac = doArgs args action -            s <- runReaderT ac c +            s <- handle (const $ return "error") $ runReaderT ac c              cb s              tenthSeconds r              go | 
