diff options
| author |  Alexander Foremny <aforemny@posteo.de> | 2023-11-29 05:39:32 +0100 |
|---|---|---|
| committer | Alexander Foremny <aforemny@posteo.de> | 2023-11-29 05:44:37 +0100 |
| commit | c2e4b0a28c050c52f6ed84d6ae1e7172e4b6b08a (patch) | |
| tree | 7ea64f2a1bb4f3d78786d81d4603e1479c3087dd /app/Main.hs | |
| parent | 8c0d5f70b4a2e5928dce73769d46a79b2b051f63 (diff) | |
support comments
Diffstat (limited to 'app/Main.hs')
| -rw-r--r-- | app/Main.hs | 14 |
1 files changed, 1 insertions, 13 deletions
diff --git a/app/Main.hs b/app/Main.hs index f798d33..c163d40 100644 --- a/app/Main.hs +++ b/app/Main.hs @@ -295,19 +295,6 @@ -- allow that). The first marker should have priority in case we have to pick -- one. --- TODO Support issue comments --- --- Currently, comments do not get picked up in issue descriptions; see the --- issue below. --- --- I would like to parse comments (much like issues), and associate them with --- the preceding issue. --- --- `anissue show` should then show all comments below the current output. --- --- @priority high --- @assigned Alexander Foremny - -- TODO Add command for (re)generating the cache -- -- When running `anissue cache generate`, we will only generated the @@ -667,6 +654,7 @@ main = do let s = (LT.fromStrict (T.intercalate " " issue.markers) <> " " <> LT.fromStrict issue.title) <> maybe "" (("\n\n" <>) . LT.fromStrict) issue.description + <> LT.intercalate "\n" (map ((("***\n" :: LT.Text) <>) . LT.fromStrict) issue.comments) if edit then do withSystemTempFile (printf "%s.md" id) $ \fp h -> do |