diff --git a/cardano-api/internal/Cardano/Api/LedgerEvents/Rule/TICK/NEWEPOCH.hs b/cardano-api/internal/Cardano/Api/LedgerEvents/Rule/TICK/NEWEPOCH.hs
index 301ae1953b..b8c8fcf085 100644
--- a/cardano-api/internal/Cardano/Api/LedgerEvents/Rule/TICK/NEWEPOCH.hs
+++ b/cardano-api/internal/Cardano/Api/LedgerEvents/Rule/TICK/NEWEPOCH.hs
@@ -96,6 +96,6 @@ handleConwayNEWEPOCHEvents conwayNewEpochEvent =
                                                 (convertRetiredPoolsMap refundPools)
                                                 (convertRetiredPoolsMap unclaimedPools)
         Conway.SnapEvent _ -> Nothing
-        Conway.GovInfoEvent {} -> Nothing -- FIXME: Confirm if we need a new event here
+        Conway.GovInfoEvent {} -> Nothing
 
     Conway.TotalAdaPotsEvent _ -> Nothing
diff --git a/cardano-api/internal/Cardano/Api/Tx/Body.hs b/cardano-api/internal/Cardano/Api/Tx/Body.hs
index c067e9efb6..b395f25f0f 100644
--- a/cardano-api/internal/Cardano/Api/Tx/Body.hs
+++ b/cardano-api/internal/Cardano/Api/Tx/Body.hs
@@ -3060,9 +3060,9 @@ genesisUTxOPseudoTxIn nw (GenesisUTxOKeyHash kh) =
              (Shelley.KeyHashObj kh)
              Shelley.StakeRefNull
 
--- | Calculate the reference inputs size for provided set of transaction IDs and UTXOs.
+-- | Calculate the reference inputs size in bytes for provided set of transaction IDs and UTXOs.
 getReferenceInputsSizeForTxIds
-  :: forall era ledgerera. ShelleyLedgerEra era ~ ledgerera
+  :: ShelleyLedgerEra era ~ ledgerera
   => BabbageEraOnwards era
   -> Ledger.UTxO ledgerera
   -> Set TxIn