Skip to content

Commit

Permalink
New version 7.0.0.0
Browse files Browse the repository at this point in the history
  • Loading branch information
newhoggy committed May 29, 2023
1 parent 769e6c2 commit a05c626
Show file tree
Hide file tree
Showing 2 changed files with 10 additions and 10 deletions.
4 changes: 2 additions & 2 deletions cardano-cli/cardano-cli.cabal
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
cabal-version: 3.4

name: cardano-cli
version: 8.1.0
version: 7.0.0.0
synopsis: The Cardano command-line interface
description: The Cardano command-line interface.
copyright: 2020-2023 Input Output Global Inc (IOG).
Expand Down Expand Up @@ -200,9 +200,9 @@ test-suite cardano-cli-test
, bytestring
, cardano-api ^>= 8.1.0.1
, cardano-api-gen ^>= 8.1.0.2
, cardano-api:internal
, cardano-cli
, cardano-cli:cardano-cli-test-lib
, cardano-node
, cardano-slotting ^>= 0.1
, containers
, directory
Expand Down
16 changes: 8 additions & 8 deletions cardano-cli/test/cardano-cli-test/Test/Cli/FilePermissions.hs
Original file line number Diff line number Diff line change
@@ -1,22 +1,22 @@
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE TemplateHaskell #-}

module Test.Cli.FilePermissions
( tests
) where

import Cardano.Api
import Cardano.Node.Run (checkVRFFilePermissions)
import Cardano.Api.IO (checkVrfFilePermissions)

import Hedgehog (Property, discover, success)
import Hedgehog (Property, discover, success)
import qualified Hedgehog
import qualified Hedgehog.Extras.Test.Base as H
import qualified Hedgehog.Extras.Test.Base as H
import Hedgehog.Internal.Property (failWith)

import Control.Monad (void)
import Control.Monad.IO.Class (MonadIO (..))
import Control.Monad (void)
import Control.Monad.IO.Class (MonadIO (..))
import Control.Monad.Trans.Except (runExceptT)
import Test.Cardano.CLI.Util (execCardanoCLI)
import Test.Cardano.CLI.Util (execCardanoCLI)

-- | This property ensures that the VRF signing key file is created only with owner permissions
prop_createVRFSigningKeyFilePermissions :: Property
Expand All @@ -34,7 +34,7 @@ prop_createVRFSigningKeyFilePermissions =
, "--signing-key-file", vrfSignKey
]

result <- liftIO . runExceptT $ checkVRFFilePermissions (File vrfSignKey)
result <- liftIO . runExceptT $ checkVrfFilePermissions (File vrfSignKey)
case result of
Left err ->
failWith Nothing
Expand Down

0 comments on commit a05c626

Please sign in to comment.