aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--app/Issue.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/app/Issue.hs b/app/Issue.hs
index 2ada47b..e6515a9 100644
--- a/app/Issue.hs
+++ b/app/Issue.hs
@@ -96,7 +96,7 @@ stripIssueMarkers text =
case [marker | marker <- issueMarkers, T.isPrefixOf marker text] of
(marker : _) ->
W.first (marker :) . stripIssueMarkers $
- T.drop (T.length marker) text
+ T.stripStart (T.drop (T.length marker) text)
[] ->
([], text)