~jackwines/discourse-tui

660314f12ee03123bd6b4a36f434efc01c16f95e — Jack Wines 2 years ago 8d94cf5
sneaky Debug.Trace hiding there
1 files changed, 1 insertions(+), 2 deletions(-)

M src/Types.hs
M src/Types.hs => src/Types.hs +1 -2
@@ 4,7 4,6 @@ import Data.Aeson
import Cursor.Simple.List.NonEmpty (NonEmptyCursor)
import qualified Data.IntMap.Strict as M
import Brick.Widgets.List
import Debug.Trace
import GHC.Generics
import Control.Lens
import Control.Lens.TH


@@ 57,7 56,7 @@ instance FromJSON PostResponse where

instance FromJSON Post where
    parseJSON = withObject "Post" $ \v -> do
        id' <- traceShow v (v .: "id")
        id' <- v .: "id"
        username' <- v .: "username"
        cooked' <- v .: "cooked"
        actions <- v .: "actions_summary"