1  module Reflex.Extra (onClient) where
 2  
 3  import Reflex.Dom.Core
 4  
 5  onClient ::
 6    forall a m t.
 7    (Applicative m, Prerender t m) =>
 8    Client m (Event t a) ->
 9    m (Event t a)
10  onClient = fmap switchDyn . prerender (pure never)