@@ -318,8 +318,7 @@ addHydrationStepWithSetup :: (Adjustable t m, MonadIO m) => m a -> (a -> Hydrati
318318addHydrationStepWithSetup setup f = getHydrationMode >>= \case
319319 HydrationMode_Immediate -> pure ()
320320 HydrationMode_Hydrating -> do
321− switchover <- HydrationDomBuilderT $ asks _hydrationDomBuilderEnv_switchover
322− (s, _) <- lift $ runWithReplace setup $ return () <$ switchover
321+ s <- lift setup
323322 addHydrationStep (f s)
324323
325324-- | Add a hydration step