diff options
author | Roman Smrž <roman.smrz@seznam.cz> | 2025-01-18 21:27:06 +0100 |
---|---|---|
committer | Roman Smrž <roman.smrz@seznam.cz> | 2025-01-19 18:23:43 +0100 |
commit | 2e69f4239223b41ada346c340f058ca91342781e (patch) | |
tree | eb924bb9aae1805b1df71dc1d776ffd1aed4a06c /src/Command/Run.hs | |
parent | 1ecc43458cd5c4f41fb23948c48e429e376704a5 (diff) |
Watch branches and tags in git repositories
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 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 |