Move genesis create test to proper location

IntersectMBO · Jul 10, 2020 · 550467e · 550467e
1 parent dd85293
commit 550467e
Show file tree

Hide file tree

Showing 4 changed files with 6 additions and 10 deletions.
diff --git a/cardano-cli/cardano-cli.cabal b/cardano-cli/cardano-cli.cabal
@@ -196,6 +196,7 @@ test-suite cardano-cli-pioneers
                         Test.CLI.Byron.Golden.TextEnvelope.Tx
                         Test.CLI.Byron.Golden.TextEnvelope.TxBody
                         Test.CLI.Byron.Golden.TextEnvelope.Witness
+                        Test.CLI.Shelley.Golden.Genesis.Create
                         Test.CLI.Shelley.Golden.Metadata.StakePoolMetadata
                         Test.CLI.Shelley.Golden.TextEnvelope.Certificates.MIRCertificate
                         Test.CLI.Shelley.Golden.TextEnvelope.Certificates.OperationalCertificate
@@ -211,8 +212,6 @@ test-suite cardano-cli-pioneers
                         Test.CLI.Shelley.Golden.TextEnvelope.Tx.Tx
                         Test.CLI.Shelley.Golden.TextEnvelope.Tx.TxBody
                         Test.CLI.Shelley.Golden.TextEnvelope.Tx.Witness
-                        Test.CLI.TextEnvelope.Golden.Genesis.Create
-                        Test.CLI.TextEnvelope.Tests
                         Test.CLI.Shelley.Tests
                         Test.ITN
                         Test.OptParse

diff --git a/cardano-cli/test/Test/CLI/Shelley/Golden/Genesis/Create.hs b/cardano-cli/test/Test/CLI/Shelley/Golden/Genesis/Create.hs
@@ -1,7 +1,7 @@
 {-# LANGUAGE OverloadedStrings    #-}
 
-module Test.CLI.TextEnvelope.Shelley.Golden.Genesis.Create
-  ( golden_genesisCreate
+module Test.CLI.Shelley.Golden.Genesis.Create
+  ( golden_shelleyGenesisCreate
   ) where
 
 import Cardano.Prelude hiding (to)
@@ -63,8 +63,8 @@ justResult Nothing = H.failWith Nothing "Expecting Just, got nothing"
 result :: Show a => a -> H.PropertyT IO a
 result a = H.forAll $ pure a
 
-golden_genesisCreate :: Property
-golden_genesisCreate = OP.propertyOnce $ do
+golden_shelleyGenesisCreate :: Property
+golden_shelleyGenesisCreate = OP.propertyOnce $ do
   liftIO $ IO.createDirectoryIfMissing True "tmp"
   tempDir <- liftIO $ IO.createTempDirectory "tmp" "test"
   let genesisFile = tempDir <> "/genesis.json"

diff --git a/cardano-cli/test/Test/CLI/Shelley/Tests.hs b/cardano-cli/test/Test/CLI/Shelley/Tests.hs
@@ -9,7 +9,7 @@ module Test.CLI.Shelley.Tests
 
 import           Cardano.Prelude
 
-import           Test.CLI.TextEnvelope.Shelley.Golden.Genesis.Create
+import           Test.CLI.Shelley.Golden.Genesis.Create
                    (golden_shelleyGenesisCreate)
 import           Test.CLI.Shelley.Golden.TextEnvelope.Certificates.StakeAddressCertificates
                    (golden_shelleyStakeAddressCertificates)

diff --git a/cardano-cli/test/cardano-cli-pioneers.hs b/cardano-cli/test/cardano-cli-pioneers.hs
@@ -6,7 +6,6 @@ import           System.IO (BufferMode (..))
 import qualified System.IO as IO
 
 import qualified Test.CLI.Shelley.Tests
-import qualified Test.CLI.TextEnvelope.Tests
 import qualified Test.ITN
 import qualified Test.Pioneers.Exercise1
 import qualified Test.Pioneers.Exercise2
@@ -23,8 +22,6 @@ main = do
               , Test.CLI.Shelley.Tests.metaDatatests
               , Test.CLI.Shelley.Tests.txTests
 
-              , Test.CLI.TextEnvelope.Tests.cliTests
-
               , Test.Pioneers.Exercise1.tests
               , Test.Pioneers.Exercise2.tests
               , Test.Pioneers.Exercise3.tests