diff options
author | Fabian Kirchner <kirchner@posteo.de> | 2023-10-13 19:14:13 +0200 |
---|---|---|
committer | Fabian Kirchner <kirchner@posteo.de> | 2023-10-13 19:14:13 +0200 |
commit | b0cbe84cef6c8504d692fc65cbfd3427bd4f1f6f (patch) | |
tree | 3608c3778d6517dc26f65fb7b2f3bd871a6e8b97 | |
parent | 0f28fa0e22eec74456e3597f7cf2dcb135278750 (diff) |
do not strip tags from description
-rw-r--r-- | app/Issue.hs | 6 |
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))) |