diff options
Diffstat (limited to 'src/Reaktor/Plugins/System/Internal.hs')
| -rw-r--r-- | src/Reaktor/Plugins/System/Internal.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Reaktor/Plugins/System/Internal.hs b/src/Reaktor/Plugins/System/Internal.hs index e4356df..82aad6c 100644 --- a/src/Reaktor/Plugins/System/Internal.hs +++ b/src/Reaktor/Plugins/System/Internal.hs @@ -52,6 +52,7 @@ data Hook = Hook , hPattern :: Maybe Regex , hCommand :: CaptureOr SystemCommand , hArguments :: [CaptureOr Text] + , hEnv :: Maybe (HashMap String String) , hWorkDir :: Maybe FilePath , hCommands :: HashMap Text SystemCommand , hTimeout :: Maybe Int @@ -66,6 +67,7 @@ instance FromJSON Hook where <*> (fmap (flip RE.compile [RE.utf8]) <$> v .:? "pattern") <*> v .: "command" <*> v .:? "arguments" .!= [] + <*> v .:? "env" <*> v .:? "workdir" <*> v .:? "commands" .!= mempty <*> (fmap (*1000000) <$> v .:? "timeoutSec" .!= Just 10) |