diff options
author | Roman Smrž <roman.smrz@seznam.cz> | 2025-04-05 21:41:46 +0200 |
---|---|---|
committer | Roman Smrž <roman.smrz@seznam.cz> | 2025-04-08 22:19:55 +0200 |
commit | 6645caa6796c1f253aded5c483e9f4d504f5fba5 (patch) | |
tree | 51546aabeeb8d9f14af8dbbb2848a53ecf4a9398 /src/Config.hs | |
parent | 6350311e81bb116bb7975bcc76e1dc9577194531 (diff) |
Put job ID to evaluated job
Diffstat (limited to 'src/Config.hs')
-rw-r--r-- | src/Config.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Config.hs b/src/Config.hs index 98b5aa5..fb9a527 100644 --- a/src/Config.hs +++ b/src/Config.hs @@ -78,6 +78,7 @@ instance FromYAML Config where parseJob :: Text -> Node Pos -> Parser DeclaredJob parseJob name node = flip (withMap "Job") node $ \j -> do let jobName = JobName name + jobId = jobName ( jobContainingCheckout, jobOtherCheckout ) <- partitionEithers <$> choice [ parseSingleCheckout =<< j .: "checkout" , parseMultipleCheckouts =<< j .: "checkout" |