diff options
Diffstat (limited to 'app/History')
-rw-r--r-- | app/History/PartialCommitInfo.hs | 7 |
1 files changed, 4 insertions, 3 deletions
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 |