aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorLibravatar Fabian Kirchner <kirchner@posteo.de>2023-10-13 19:14:13 +0200
committerLibravatar Fabian Kirchner <kirchner@posteo.de>2023-10-13 19:14:13 +0200
commitb0cbe84cef6c8504d692fc65cbfd3427bd4f1f6f (patch)
tree3608c3778d6517dc26f65fb7b2f3bd871a6e8b97
parent0f28fa0e22eec74456e3597f7cf2dcb135278750 (diff)
do not strip tags from description
-rw-r--r--app/Issue.hs6
1 files changed, 1 insertions, 5 deletions
diff --git a/app/Issue.hs b/app/Issue.hs
index d163df7..0e3ac2b 100644
--- a/app/Issue.hs
+++ b/app/Issue.hs
@@ -41,7 +41,7 @@ fromMatch result match =
Just
Issue
{ title = title,
- description = stripTags <$> description,
+ description = description,
start = match.start,
end = match.end,
tags = maybe [] I.extractTags description,
@@ -57,7 +57,3 @@ marker = "TODO"
stripMarker :: Text -> Text
stripMarker text = maybe text T.stripStart (T.stripPrefix marker text)
-
-stripTags :: Text -> Text
-stripTags text =
- T.strip (T.unlines (filter (not . T.isPrefixOf "@") (T.lines text)))