From 59f560ede4bf5f5e08e0c2e41717761f1a8c28da Mon Sep 17 00:00:00 2001
From: "Restyled.io" <commits@restyled.io>
Date: Mon, 30 Jul 2018 02:49:00 +0000
Subject: [PATCH] Restyled

---
 test/Rollbar/Item/Data/Test.hs           | 17 +++++++-------
 test/Rollbar/Item/MissingHeaders/Test.hs | 25 +++++++++++----------
 test/Rollbar/Item/Request/Test.hs        | 28 ++++++++++++------------
 3 files changed, 36 insertions(+), 34 deletions(-)

diff --git a/test/Rollbar/Item/Data/Test.hs b/test/Rollbar/Item/Data/Test.hs
index 6404e2c..3426bd5 100644
--- a/test/Rollbar/Item/Data/Test.hs
+++ b/test/Rollbar/Item/Data/Test.hs
@@ -1,15 +1,16 @@
-{-# LANGUAGE DataKinds #-}
-{-# LANGUAGE LambdaCase #-}
+{-# LANGUAGE DataKinds         #-}
+{-# LANGUAGE LambdaCase        #-}
 {-# LANGUAGE OverloadedStrings #-}
 module Rollbar.Item.Data.Test where
 
-import Data.Aeson      (Value(Null, Object), decode', encode, toJSON)
-import Data.Text       (Text)
+import           Data.Aeson          (Value (Null, Object), decode', encode,
+                                      toJSON)
+import           Data.Text           (Text)
 
-import Rollbar.Item
-import Rollbar.QuickCheck ()
+import           Rollbar.Item
+import           Rollbar.QuickCheck  ()
 
-import Test.QuickCheck (conjoin, quickCheck)
+import           Test.QuickCheck     (conjoin, quickCheck)
 
 import qualified Data.HashMap.Strict
 
@@ -39,5 +40,5 @@ key :: Text -> Value -> [(Text, Value)]
 key k = \case
   Object o -> case Data.HashMap.Strict.lookupDefault Null k o of
     Object o -> Data.HashMap.Strict.toList o
-    _ -> mempty
+    _        -> mempty
   _ -> mempty
diff --git a/test/Rollbar/Item/MissingHeaders/Test.hs b/test/Rollbar/Item/MissingHeaders/Test.hs
index 21e1404..ad608b5 100644
--- a/test/Rollbar/Item/MissingHeaders/Test.hs
+++ b/test/Rollbar/Item/MissingHeaders/Test.hs
@@ -1,22 +1,23 @@
-{-# LANGUAGE DataKinds #-}
-{-# LANGUAGE FlexibleContexts #-}
+{-# LANGUAGE DataKinds         #-}
+{-# LANGUAGE FlexibleContexts  #-}
 {-# LANGUAGE FlexibleInstances #-}
-{-# LANGUAGE LambdaCase #-}
+{-# LANGUAGE LambdaCase        #-}
 {-# LANGUAGE OverloadedStrings #-}
-{-# LANGUAGE TypeOperators #-}
+{-# LANGUAGE TypeOperators     #-}
 module Rollbar.Item.MissingHeaders.Test where
 
-import Data.Aeson   (Value(Object), decode', encode, toJSON)
-import Data.Functor (void)
-import Data.HashSet (HashSet)
-import Data.Text    (Text)
+import           Data.Aeson                  (Value (Object), decode', encode,
+                                              toJSON)
+import           Data.Functor                (void)
+import           Data.HashSet                (HashSet)
+import           Data.Text                   (Text)
 
-import Prelude hiding (error)
+import           Prelude                     hiding (error)
 
-import Rollbar.Item.MissingHeaders (MissingHeaders(..))
-import Rollbar.QuickCheck          ()
+import           Rollbar.Item.MissingHeaders (MissingHeaders (..))
+import           Rollbar.QuickCheck          ()
 
-import Test.QuickCheck (conjoin, quickCheck)
+import           Test.QuickCheck             (conjoin, quickCheck)
 
 import qualified Data.HashSet
 
diff --git a/test/Rollbar/Item/Request/Test.hs b/test/Rollbar/Item/Request/Test.hs
index be19f2d..ebc6732 100644
--- a/test/Rollbar/Item/Request/Test.hs
+++ b/test/Rollbar/Item/Request/Test.hs
@@ -1,25 +1,25 @@
-{-# LANGUAGE DataKinds #-}
+{-# LANGUAGE DataKinds         #-}
 {-# LANGUAGE FlexibleInstances #-}
-{-# LANGUAGE LambdaCase #-}
+{-# LANGUAGE LambdaCase        #-}
 {-# LANGUAGE OverloadedStrings #-}
-{-# LANGUAGE TypeOperators #-}
+{-# LANGUAGE TypeOperators     #-}
 module Rollbar.Item.Request.Test where
 
-import Data.Aeson           (Value(Object), decode', encode, toJSON)
-import Data.CaseInsensitive (original)
-import Data.Foldable        (fold)
-import Data.Functor         (void)
-import Data.HashSet         (HashSet)
-import Data.Text            (Text)
+import           Data.Aeson           (Value (Object), decode', encode, toJSON)
+import           Data.CaseInsensitive (original)
+import           Data.Foldable        (fold)
+import           Data.Functor         (void)
+import           Data.HashSet         (HashSet)
+import           Data.Text            (Text)
 
-import Prelude hiding (error)
+import           Prelude              hiding (error)
 
-import Rollbar.Item.Request (MissingHeaders(..))
-import Rollbar.QuickCheck   ()
+import           Rollbar.Item.Request (MissingHeaders (..))
+import           Rollbar.QuickCheck   ()
 
-import Test.QuickCheck (conjoin, quickCheck)
+import           Test.QuickCheck      (conjoin, quickCheck)
 
-import qualified Data.Text.Encoding as TE
+import qualified Data.Text.Encoding   as TE
 
 import qualified Data.HashSet