Update golden files with new description

Using the upstream serialization from cardano-api includes a
description. Also left a note why we are using a deprecated function
here now (they'll fix it in cardano-api).

See IntersectMBO/cardano-api#630

hydra-node/json-schemas/api.yaml

@@ -1982,6 +1982,16 @@ components:
         - cborHex
         - description
         - type
+      description: |
+        A Cardano transaction in the text envelope format . That is, a JSON
+        object wrapper with some 'type' around a 'cborHex' encoded transaction.
+        The hydra-node uses this format as follows:
+
+          - When encoding, an additonal 'txId' is included.
+          - On decoding, when 'txId' is included it is checked to be consistent.
+          - The 'type' is not used to determine content and any transaction is
+            tried to decode as a 'ConwayEra' transaction, which mostly is
+            backward compatible to previous eras.
       properties:
         type:
           type: string

hydra-tx/hydra-tx.cabal

@@ -95,7 +95,6 @@ library
     , hydra-plutus-extras
     , hydra-prelude
     , lens
-    , lens-aeson
     , ouroboros-consensus
     , ouroboros-consensus-cardano
     , plutus-core

hydra-tx/src/Hydra/Tx/IsTx.hs

@@ -1,5 +1,7 @@
 {-# LANGUAGE AllowAmbiguousTypes #-}
 {-# LANGUAGE TypeFamilyDependencies #-}
+-- NOTE: For serialiseTxLedgerCddl
+{-# OPTIONS_GHC -Wno-deprecations #-}
 {-# OPTIONS_GHC -Wno-orphans #-}
 
 module Hydra.Tx.IsTx where
@@ -108,7 +110,11 @@ type ArbitraryIsTx tx =
 
 instance IsShelleyBasedEra era => ToJSON (Api.Tx era) where
   toJSON tx =
-    case toJSON $ serialiseToTextEnvelope (Just "Hydra-encoded cardano-api Tx") tx of
+    -- XXX: This is a deprecated function, but the only one that produces the
+    -- right 'Witnessed Tx ConwayEra' in the envelope type. Cardano-api will be
+    -- fixing the 'HasTextEnvelope' instance for 'Tx era' and then we can use
+    -- 'serialiseToTextEnvelope' here.
+    case toJSON $ serialiseTxLedgerCddl shelleyBasedEra tx of
       Aeson.Object km ->
         Aeson.Object $ KeyMap.insert "txId" (toJSON $ getTxId $ getTxBody tx) km
       v -> v