Update libs/cardano-ledger-core/src/Cardano/Ledger/State/CertState.hs

Co-authored-by: Alexey Kuleshevich <alexey.kuleshevich@iohk.io>

Author: Soupstraw

libs/cardano-ledger-core/src/Cardano/Ledger/State/CertState.hs

@@ -420,7 +420,7 @@ payPoolDeposit ::
 payPoolDeposit keyhash pp pstate = pstate {psDeposits = newpool}
   where
     pool = psDeposits pstate
-    !deposit = pp ^. ppPoolDepositL
+    !deposit = pp ^. ppPoolDepositCompactL
     newpool
       | Map.notMember keyhash pool = Map.insert keyhash (compactCoinOrError deposit) pool
       | otherwise = pool