diff --git a/shelley-ma/impl/src/Cardano/Ledger/Allegra/Translation.hs b/shelley-ma/impl/src/Cardano/Ledger/Allegra/Translation.hs
index 07073656ee0..0c8033572a2 100644
--- a/shelley-ma/impl/src/Cardano/Ledger/Allegra/Translation.hs
+++ b/shelley-ma/impl/src/Cardano/Ledger/Allegra/Translation.hs
@@ -52,9 +52,7 @@ instance (ShelleyBased (AllegraEra c), Crypto c) => TranslateEra (AllegraEra c)
           nesBprev = translateEra' ctxt $ nesBprev nes,
           nesBcur = translateEra' ctxt $ nesBcur nes,
           nesEs = translateEra' ctxt $ LS.returnRedeemAddrsToReserves . nesEs $ nes,
-          nesRu = case nesRu nes of
-            SNothing -> SNothing
-            SJust rs -> SJust $ translateEra' ctxt rs,
+          nesRu = translateEra' ctxt <$> nesRu nes,
           nesPd = nesPd nes
         }