Skip to content

Instantly share code, notes, and snippets.

{-# LANGUAGE FlexibleContexts, FlexibleInstances, GADTs, GeneralizedNewtypeDeriving, MultiParamTypeClasses,
OverloadedStrings, QuasiQuotes, TemplateHaskell, TypeFamilies, TypeSynonymInstances #-}
import ClassyPrelude (catchAnyDeep)
import Conduit
import Control.Applicative ((<$>))
import Control.Concurrent.STM.Lifted
import Control.Monad (forM_, forever, void)
import Control.Monad.Logger (runStderrLoggingT)
import Data.Aeson
import Data.Text (Text, pack)