From 60fb967e2de7ab290f46d4a84fd920dfe8d264b0 Mon Sep 17 00:00:00 2001
From: Alexander Foremny <aforemny@posteo.de>
Date: Tue, 7 Nov 2023 22:02:37 +0100
Subject: fix issue title

This regression had been introduced in
d9400635bcb28674c8510d71aa6eed94194bf669.
---
 app/Issue.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'app/Issue.hs')

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)
 
-- 
cgit v1.2.3