diff options
| -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))) |