WIP: fixing compiler errors in specs

2016-01-24 18:09:19 -08:00
parent 3844f3ee96
commit fec316b087
11 changed files with 42 additions and 78 deletions
@@ -1,18 +1,17 @@
 module Feature.StructureSpec where

+import Data.Pool
 import Test.Hspec hiding (pendingWith)
 import Test.Hspec.Wai
 import Test.Hspec.Wai.JSON
-
-import Hasql as H
-import Hasql.Postgres as P
+import qualified Hasql.Connection  as H

 import SpecHelper
 import PostgREST.Types (DbStructure(..))

 import Network.HTTP.Types

-spec :: DbStructure -> H.Pool P.Postgres -> Spec
+spec :: DbStructure -> Pool H.Connection -> Spec
 spec struct pool = around (withApp cfgDefault struct pool) $ do
  describe "GET /" $ do
    it "lists views in schema" $