From 779901182da3c74037af1d7c23179ef5322a2677 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Cl=C3=A9ment=20Hurlin?= Date: Fri, 4 Oct 2024 16:27:11 +0200 Subject: [PATCH] transaction submit: print transaction hash --- cardano-cli/src/Cardano/CLI/EraBased/Run/Transaction.hs | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/cardano-cli/src/Cardano/CLI/EraBased/Run/Transaction.hs b/cardano-cli/src/Cardano/CLI/EraBased/Run/Transaction.hs index 6e16700432..f4bf5ae0a5 100644 --- a/cardano-cli/src/Cardano/CLI/EraBased/Run/Transaction.hs +++ b/cardano-cli/src/Cardano/CLI/EraBased/Run/Transaction.hs @@ -1483,7 +1483,9 @@ runTransactionSubmitCmd res <- liftIO $ submitTxToNodeLocal localNodeConnInfo txInMode case res of - Net.Tx.SubmitSuccess -> liftIO $ Text.putStrLn "Transaction successfully submitted." + Net.Tx.SubmitSuccess -> do + liftIO $ Text.putStrLn "Transaction successfully submitted. Transaction hash is:" + liftIO $ BS.putStrLn $ serialiseToRawBytesHex (getTxId $ getTxBody tx) Net.Tx.SubmitFail reason -> case reason of TxValidationErrorInCardanoMode err -> left . TxCmdTxSubmitError . Text.pack $ show err