@@ -926,7 +926,7 @@ instance Reflex t => Align (Event t) where
926gate :: Reflex t => Behavior t Bool -> Event t a -> Event t a
926gate :: Reflex t => Behavior t Bool -> Event t a -> Event t a
927gate = attachWithMaybe $ \allow a -> if allow then Just a else Nothing
927gate = attachWithMaybe $ \allow a -> if allow then Just a else Nothing
929−-- | Create a new behavior given a starting behavior and switch to a the behvior
929+-- | Create a new behavior given a starting behavior and switch to a behavior
930-- carried by the event when it fires.
930-- carried by the event when it fires.
931switcher :: (Reflex t, MonadHold t m)
931switcher :: (Reflex t, MonadHold t m)
932 => Behavior t a -> Event t (Behavior t a) -> m (Behavior t a)
932 => Behavior t a -> Event t (Behavior t a) -> m (Behavior t a)