treefmt

cardano-scaling · Jan 18, 2024 · 18eff12 · 18eff12
1 parent 1b9840b
commit 18eff12
Showing 1 changed file with 5 additions and 6 deletions.
diff --git a/hydra-node/src/Hydra/Ledger/Cardano.hs b/hydra-node/src/Hydra/Ledger/Cardano.hs
@@ -131,12 +131,11 @@ instance FromCBOR Tx where
 instance ToJSON Tx where
   toJSON tx =
     let TextEnvelopeType envelopeType = textEnvelopeType (proxyToAsType (Proxy @Tx))
-    in
-    object
-      [ "cborHex" .= (Aeson.String $ decodeUtf8 $ Base16.encode $ serialiseToCBOR tx)
-      , "txId" .= (txId tx)
-      , "type" .= envelopeType
-      ]
+     in object
+          [ "cborHex" .= (Aeson.String $ decodeUtf8 $ Base16.encode $ serialiseToCBOR tx)
+          , "txId" .= (txId tx)
+          , "type" .= envelopeType
+          ]
 
 instance FromJSON Tx where
   parseJSON =