@@ -363,8 +363,8 @@ instance Reflex t => Align (Event t) where
363363gate :: Reflex t => Behavior t Bool -> Event t a -> Event t a
364364gate = attachWithMaybe $ \allow a -> if allow then Just a else Nothing
365365
366−-- | Create a new behavior given a starting behavior and switch to a the
367−-- behvior carried by the event when it fires.
366+-- | Create a new behavior given a starting behavior and switch to the
367+-- behavior carried by the event when it fires.
368368switcher :: (Reflex t, MonadHold t m)
369369 => Behavior t a -> Event t (Behavior t a) -> m (Behavior t a)
370370switcher b eb = pull . (sample <=< sample) <$> hold b eb