From 739c0d06b63bed7619b39eb189c5e5a34fd8da49 Mon Sep 17 00:00:00 2001 From: Alexander Foremny Date: Tue, 28 Nov 2023 13:06:48 +0100 Subject: editing issues preserves comment style --- app/History/PartialCommitInfo.hs | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'app/History') diff --git a/app/History/PartialCommitInfo.hs b/app/History/PartialCommitInfo.hs index b37ada5..7497f38 100644 --- a/app/History/PartialCommitInfo.hs +++ b/app/History/PartialCommitInfo.hs @@ -99,13 +99,14 @@ fromComment cwd comment = do end = comment.end, tags = maybe [] I.extractTags description, markers = markers, - rawText = rawText + rawText = rawText, + commentStyle = commentStyle } else Nothing ) where - rawText = comment.text - (title', description) = I.extractText comment.file_type rawText + (commentStyle, rawText) = G.uncomment comment.file_type comment.text + (title', description) = I.extractText rawText (markers, title) = I.stripIssueMarkers title' dieOfInvalidTreeGrepperResult :: E.InvalidTreeGrepperResult -> IO a -- cgit v1.2.3