module Yi.Config.Default.Pango (configurePango) where

import Lens.Micro.Platform ((.=))
import Yi.Frontend.Pango   (start)
import Yi.Config.Lens      (startFrontEndA)
import Yi.Config.Simple    (ConfigM)

configurePango :: ConfigM ()
configurePango :: ConfigM ()
configurePango = (UIBoot -> Identity UIBoot) -> Config -> Identity Config
Lens' Config UIBoot
startFrontEndA ((UIBoot -> Identity UIBoot) -> Config -> Identity Config)
-> UIBoot -> ConfigM ()
forall s (m :: * -> *) a b.
MonadState s m =>
ASetter s s a b -> b -> m ()
.= UIBoot
start