summaryrefslogtreecommitdiff
path: root/src/Command/Run.hs
diff options
context:
space:
mode:
authorRoman Smrž <roman.smrz@seznam.cz>2025-01-18 21:27:06 +0100
committerRoman Smrž <roman.smrz@seznam.cz>2025-01-19 18:23:43 +0100
commit2e69f4239223b41ada346c340f058ca91342781e (patch)
treeeb924bb9aae1805b1df71dc1d776ffd1aed4a06c /src/Command/Run.hs
parent1ecc43458cd5c4f41fb23948c48e429e376704a5 (diff)
Watch branches and tags in git repositories
Diffstat (limited to 'src/Command/Run.hs')
-rw-r--r--src/Command/Run.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Command/Run.hs b/src/Command/Run.hs
index 945a4fd..14341cd 100644
--- a/src/Command/Run.hs
+++ b/src/Command/Run.hs
@@ -79,7 +79,7 @@ cmdRun (RunCommand changeset) = do
forM_ jobssets $ \jobset -> do
let commit = jobsetCommit jobset
shortCid = T.pack $ take 7 $ showCommitId $ commitId commit
- shortDesc = fitToLength 50 (commitDescription commit)
+ shortDesc <- fitToLength 50 <$> getCommitTitle commit
case jobsetJobsEither jobset of
Right jobs -> do
outs <- runJobs mngr commit jobs