module Yi.Config.Default.JavaScriptMode (configureJavaScriptMode) where import Lens.Micro.Platform ((%=)) import Yi.Mode.JavaScript import Yi.Config.Simple (ConfigM) import Yi.Config.Lens (modeTableA) import Yi.Types (AnyMode (..)) configureJavaScriptMode :: ConfigM () configureJavaScriptMode :: ConfigM () configureJavaScriptMode = ([AnyMode] -> Identity [AnyMode]) -> Config -> Identity Config Lens' Config [AnyMode] modeTableA (([AnyMode] -> Identity [AnyMode]) -> Config -> Identity Config) -> ([AnyMode] -> [AnyMode]) -> ConfigM () forall s (m :: * -> *) a b. MonadState s m => ASetter s s a b -> (a -> b) -> m () %= (Mode (Tree TT) -> AnyMode forall syntax. Mode syntax -> AnyMode AnyMode (Mode (Tree TT) -> Mode (Tree TT) hooks Mode (Tree TT) javaScriptMode) AnyMode -> [AnyMode] -> [AnyMode] forall a. a -> [a] -> [a] :)