Truncate task title to 52 characters in commit message subject line

The build and tests pass. The change is complete - the task title
in com

Task-Id: t-159

1 files changed, 1 insertions, 1 deletions

diff --git a/Omni/Agent/Worker.hs b/Omni/Agent/Worker.hs
index 3edfbca..dabf45c 100644
--- a/Omni/Agent/Worker.hs
+++ b/Omni/Agent/Worker.hs
@@ -330,7 +330,7 @@ formatCommitMessage task ampOutput =
   where
     cleanSubject s =
       let stripped = Text.dropWhileEnd (`elem` ['.', ':', '!', '?', ' ']) s
-          truncated = if Text.length stripped > 72 then Text.take 69 stripped <> "..." else stripped
+          truncated = if Text.length stripped > 52 then Text.take 49 stripped <> "..." else stripped
           capitalized = case Text.uncons truncated of
             Just (c, rest) -> Text.cons (toUpper c) rest
             Nothing -> truncated