diff options
author | Vincent Ambo <tazjin@google.com> | 2019-07-04T15·05+0100 |
---|---|---|
committer | Vincent Ambo <tazjin@google.com> | 2019-07-04T15·05+0100 |
commit | 407a65b9ba7e0ffb89fc1a5322366906efec721c (patch) | |
tree | b11c9c6373e86b78714410700c134508b37f11b5 /services/tazblog/src/BlogDB.hs | |
parent | d26cf3d806e33ed678878733e2c40bb09e9b15c9 (diff) |
refactor(tazblog): Move required GHC extensions into source r/25
Necessary because Cabal is going away.
Diffstat (limited to 'services/tazblog/src/BlogDB.hs')
-rw-r--r-- | services/tazblog/src/BlogDB.hs | 38 |
1 files changed, 25 insertions, 13 deletions
diff --git a/services/tazblog/src/BlogDB.hs b/services/tazblog/src/BlogDB.hs index bc9c24393302..f74f9ecd4fab 100644 --- a/services/tazblog/src/BlogDB.hs +++ b/services/tazblog/src/BlogDB.hs @@ -1,18 +1,30 @@ +{-# LANGUAGE DeriveDataTypeable #-} +{-# LANGUAGE FlexibleContexts #-} +{-# LANGUAGE GeneralizedNewtypeDeriving #-} +{-# LANGUAGE MultiParamTypeClasses #-} +{-# LANGUAGE OverloadedStrings #-} +{-# LANGUAGE QuasiQuotes #-} +{-# LANGUAGE RecordWildCards #-} +{-# LANGUAGE ScopedTypeVariables #-} +{-# LANGUAGE TemplateHaskell #-} +{-# LANGUAGE TypeFamilies #-} + module BlogDB where -import Control.Monad.Reader (ask) -import Control.Monad.State (get, put) -import Data.Acid -import Data.Acid.Advanced -import Data.Acid.Remote -import Data.ByteString (ByteString) -import Data.Data (Data, Typeable) -import Data.IxSet (Indexable (..), IxSet, Proxy (..), getOne, ixFun, ixSet, (@=)) -import Data.SafeCopy (base, deriveSafeCopy) -import Data.Text (Text, pack) -import Data.Time -import Network (PortID (..)) -import System.Environment (getEnv) +import Control.Monad.Reader (ask) +import Control.Monad.State (get, put) +import Data.Acid +import Data.Acid.Advanced +import Data.Acid.Remote +import Data.ByteString (ByteString) +import Data.Data (Data, Typeable) +import Data.IxSet (Indexable (..), IxSet, Proxy (..), + getOne, ixFun, ixSet, (@=)) +import Data.SafeCopy (base, deriveSafeCopy) +import Data.Text (Text, pack) +import Data.Time +import Network (PortID (..)) +import System.Environment (getEnv) import qualified Crypto.Hash.SHA512 as SHA (hash) import qualified Data.ByteString.Base64 as B64 (encode) |