diff options
Diffstat (limited to 'src/Command/Run.hs')
| -rw-r--r-- | src/Command/Run.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Command/Run.hs b/src/Command/Run.hs index 3968196..383276d 100644 --- a/src/Command/Run.hs +++ b/src/Command/Run.hs @@ -129,7 +129,7 @@ argumentJobSource names = do case find ((name ==) . jobName) (configJobs config) of Just job -> return job Nothing -> tfail $ "job `" <> textJobName name <> "' not found" - Just jobsetCommit <- flip readCommit "HEAD" =<< getDefaultRepo + jobsetCommit <- createWipCommit =<< getDefaultRepo oneshotJobSource [ JobSet {..} ] rangeSource :: Repo -> Text -> Text -> IO JobSource |