@@ -1,4 +1,5 @@
1{-# LANGUAGE DeriveDataTypeable #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2+{-# LANGUAGE RankNTypes #-}
2{-# LANGUAGE RecordWildCards #-}
3{-# LANGUAGE RecordWildCards #-}
3{-# LANGUAGE ScopedTypeVariables #-}
4{-# LANGUAGE ScopedTypeVariables #-}
4module Katip.Scribes.ElasticSearch
5module Katip.Scribes.ElasticSearch
@@ -31,6 +32,7 @@ import Control.Monad.Catch
31import Control.Monad.STM
32import Control.Monad.STM
32import Control.Retry
33import Control.Retry
33import Data.Aeson
34import Data.Aeson
34import qualified Data.Text.Encoding as T
36import qualified Data.Text.Encoding as T
35import Data.Typeable
37import Data.Typeable
36import Data.UUID
38import Data.UUID