summaryrefslogtreecommitdiff
path: root/src/Job.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Job.hs')
-rw-r--r--src/Job.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Job.hs b/src/Job.hs
index b40273f..1d4ade3 100644
--- a/src/Job.hs
+++ b/src/Job.hs
@@ -382,7 +382,7 @@ runJob job uses checkoutPath jdir = do
copyRecursive (aoutStorePath aout) target
bracket (liftIO $ openFile (jdir </> "log") WriteMode) (liftIO . hClose) $ \logs -> do
- forM_ (jobRecipe job) $ \p -> do
+ forM_ (fromMaybe [] $ jobRecipe job) $ \p -> do
(Just hin, _, _, hp) <- liftIO $ createProcess_ "" p
{ cwd = Just checkoutPath
, std_in = CreatePipe