Address lints

Author: palas

cardano-api/src/Cardano/Api/Experimental/Tx/Internal/AnyWitness.hs

@@ -161,10 +161,10 @@ fromPlutusRunnable L.SPlutusV4 eon runnable =
     AlonzoEraOnwardsBabbage -> Nothing
     AlonzoEraOnwardsConway ->
       let plutusScript = L.plutusFromRunnable runnable
-       in Just $ (error "fromPlutusRunnable: ConwayPlutusV4") plutusScript
+       in Just $ error "fromPlutusRunnable: ConwayPlutusV4" plutusScript
     AlonzoEraOnwardsDijkstra ->
       let plutusScript = L.plutusFromRunnable runnable
-       in Just $ Dijkstra.MkDijkstraPlutusScript $ (error "fromPlutusRunnable: DijkstraPlutusV4") plutusScript
+       in Just $ Dijkstra.MkDijkstraPlutusScript $ error "fromPlutusRunnable: DijkstraPlutusV4" plutusScript
 
 toAlonzoDatum
   :: AlonzoEraOnwards era

cardano-api/src/Cardano/Api/LedgerState.hs

@@ -1149,7 +1149,7 @@ instance FromJSON NodeConfig where
         <*> parseAlonzoHardForkEpoch o
         <*> parseBabbageHardForkEpoch o
         <*> parseConwayHardForkEpoch o
-        <*> (pure Consensus.CardanoTriggerHardForkAtDefaultVersion) -- TODO: Dijkstra
+        <*> pure Consensus.CardanoTriggerHardForkAtDefaultVersion -- TODO: Dijkstra
     parseShelleyHardForkEpoch :: Object -> Parser (Consensus.CardanoHardForkTrigger blk)
     parseShelleyHardForkEpoch o =
       asum