rename test module

This commit is contained in:
nek0 2021-02-05 19:19:26 +01:00
parent beb284a818
commit 459074b331
2 changed files with 3 additions and 3 deletions

View File

@ -140,6 +140,6 @@ test-suite spec
, postgresql-simple , postgresql-simple
other-modules: TestUtil other-modules: TestUtil
, Spec , Spec
, MainSpec , AppMainSpec
default-language: Haskell2010 default-language: Haskell2010
build-tool-depends: hspec-discover:hspec-discover build-tool-depends: hspec-discover:hspec-discover

View File

@ -1,9 +1,8 @@
{-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE PackageImports #-} {-# LANGUAGE PackageImports #-}
module MainSpec where module AppMainSpec where
import Database.PostgreSQL.Transact import Database.PostgreSQL.Transact
import Database.PostgreSQL.Simple (Only(..))
import Test.Hspec import Test.Hspec
@ -14,6 +13,7 @@ import Control.Monad.IO.Class (liftIO)
import qualified "mateamt" Util as LibUtil import qualified "mateamt" Util as LibUtil
import TestUtil import TestUtil
spec :: Spec
spec = describeDB (const $ return ()) "Initialize DB" $ spec = describeDB (const $ return ()) "Initialize DB" $
itDB "call initialization script" $ do itDB "call initialization script" $ do
conn <- getConnection conn <- getConnection