Skip to content

Commit bf9c4d2

Browse files
committed
Try liftIO
1 parent cb3860b commit bf9c4d2

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

cardano-testnet/src/Testnet/Runtime.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -123,7 +123,7 @@ startNode tp node ipv4 port _testnetMagic nodeCmd = GHC.withFrozenCallStack $ do
123123
socketDir = makeSocketDir tp
124124
logDir = makeLogDir tp
125125

126-
void . liftIOAnnotated $ createDirectoryIfMissingNew $ logDir </> node
126+
void . liftIO $ createDirectoryIfMissingNew $ logDir </> node
127127
void . liftIOAnnotated $ createSubdirectoryIfMissingNew tempBaseAbsPath (socketDir </> node)
128128

129129
let nodeStdoutFile = logDir </> node </> "stdout.log"

0 commit comments

Comments
 (0)