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 a9effba..5a4cf7e 100644
--- a/src/Job.hs
+++ b/src/Job.hs
@@ -297,7 +297,7 @@ prepareJob dir mbCommit job inner = do
fail $ "no containing repository, can't do checkout"
return $ stringJobName (jobName job)
- jdirOther <- forM (jobOtherCheckout job) $ \( EvaluatedJobRepo repo, revision, JobCheckout mbsub dest ) -> do
+ jdirOther <- forM (jobOtherCheckout job) $ \( repo, revision, JobCheckout mbsub dest ) -> do
commit <- readCommit repo $ fromMaybe "HEAD" revision
tree <- getCommitTree commit
subtree <- maybe return (getSubtree (Just commit)) mbsub $ tree