about summary refs log tree commit diff
path: root/services/tazblog/src/BlogDB.hs
diff options
context:
space:
mode:
authorVincent Ambo <tazjin@google.com>2019-07-04T15·05+0100
committerVincent Ambo <tazjin@google.com>2019-07-04T15·05+0100
commit407a65b9ba7e0ffb89fc1a5322366906efec721c (patch)
treeb11c9c6373e86b78714410700c134508b37f11b5 /services/tazblog/src/BlogDB.hs
parentd26cf3d806e33ed678878733e2c40bb09e9b15c9 (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.hs38
1 files changed, 25 insertions, 13 deletions
diff --git a/services/tazblog/src/BlogDB.hs b/services/tazblog/src/BlogDB.hs
index bc9c243933..f74f9ecd4f 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)