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