Fix last hlint issues / hints

Author: KtorZ

src/Cardano/Wallet/Kernel/DB/Sqlite.hs

@@ -629,9 +629,7 @@ getTxMetas conn (Offset offset) (Limit limit) accountFops mbAddress fopTxId fopT
                         pure $ _outputTableTxId out
                 -- union removes txId duplicates.
                 txid <- SQL.union_ input output
-                meta <- SQL.join_ (_mDbMeta metaDB)
-                        (\ mt -> ((_txMetaTableId mt) ==. txid))
-                pure meta
+                SQL.join_ (_mDbMeta metaDB) (\ mt -> ((_txMetaTableId mt) ==. txid))
 
         metaQueryWithAddr addr = do
             meta <- case mbSorting of

test/unit/Test/Spec/Submission.hs

@@ -51,8 +51,7 @@ genPending :: Core.ProtocolMagic -> Gen Pending
 genPending pMagic = do
     elems <- listOf (do tx  <- Txp.genTx
                         wit <- (V.fromList <$> listOf (Txp.genTxInWitness pMagic))
-                        aux <- Txp.TxAux <$> pure tx <*> pure wit
-                        pure aux
+                        Txp.TxAux <$> pure tx <*> pure wit
                     )
     return $ Pending.fromTransactions elems