aboutsummaryrefslogtreecommitdiffstats
path: root/app/Issue/Text.hs
diff options
context:
space:
mode:
authorLibravatar Alexander Foremny <aforemny@posteo.de>2023-10-05 10:03:31 +0200
committerLibravatar Alexander Foremny <aforemny@posteo.de>2023-10-05 10:03:31 +0200
commit16da8a1ea6187f4bd5ef176f2aed64403b111c8c (patch)
treef304e9983afa5b9170e29f7bf0df7933e2aa1c4c /app/Issue/Text.hs
parent1890844c731b4c5c648b1871193947144aefa3dd (diff)
generate internal @id tag from title
Diffstat (limited to 'app/Issue/Text.hs')
-rw-r--r--app/Issue/Text.hs4
1 files changed, 1 insertions, 3 deletions
diff --git a/app/Issue/Text.hs b/app/Issue/Text.hs
index 190e1c7..2d3aac4 100644
--- a/app/Issue/Text.hs
+++ b/app/Issue/Text.hs
@@ -16,9 +16,7 @@ extractText fileType rawText = (title, description)
where
text = stripComments fileType $ stripLines rawText
stripLines = T.unlines . map T.strip . T.lines
- (title, description') =
- second T.stripStart $
- T.breakOn "\n\n" text
+ (title, description') = second T.stripStart $ T.breakOn "\n\n" text
description
| T.null description' = Nothing
| otherwise = Just description'