diff options
Diffstat (limited to 'app/Issue.hs')
| -rw-r--r-- | app/Issue.hs | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/app/Issue.hs b/app/Issue.hs index 4c5cc97..124b0d7 100644 --- a/app/Issue.hs +++ b/app/Issue.hs @@ -10,6 +10,7 @@ module Issue where import CMark qualified as D +import CMark.Extra () import Comment qualified as G import Data.Binary (Binary (..)) import Data.List.NonEmpty (NonEmpty) @@ -21,7 +22,6 @@ import GHC.Records (HasField (..)) import Git (Author (..), Commit (..)) import Issue.Provenance (Provenance (..)) import Issue.Tag (Tag (..)) -import Render qualified as P import Prelude hiding (id) data Issue = Issue @@ -40,13 +40,6 @@ data Issue = Issue } deriving (Show, Binary, Generic, Eq) --- TODO Resolve Binary D.Node instance --- --- @related reduce-cached-data-size -instance Binary D.Node where - put = put . T.pack . show . P.render - get = D.commonmarkToNode [] <$> get - id :: Issue -> T.Text id issue = toSpinalCase issue.title where |