@@ -52,7 +52,7 @@
5252-- getLogEnv = asks logEnv
5353-- -- with lens:
5454-- -- getLogEnv = view logEnv
55−-- localLogEnv f (App m) = App (local (\s -> s { logEnv = f (logEnv s)}) m)
55+-- localLogEnv f (App m) = App (local (\\s -> s { logEnv = f (logEnv s)}) m)
5656-- -- with lens:
5757-- -- localLogEnv f (App m) = App (local (over logEnv f) m)
5858--
@@ -61,13 +61,13 @@
6161-- getKatipContext = asks logContext
6262-- -- with lens:
6363-- -- getKatipContext = view logContext
64−-- localKatipContext f (App m) = App (local (\s -> s { logContext = f (logContext s)}) m)
64+-- localKatipContext f (App m) = App (local (\\s -> s { logContext = f (logContext s)}) m)
6565-- -- with lens:
6666-- -- localKatipContext f (App m) = App (local (over logContext f) m)
6767-- getKatipNamespace = asks logNamespace
6868-- -- with lens:
6969-- -- getKatipNamespace = view logNamespace
70−-- localKatipNamespace f (App m) = App (local (\s -> s { logNamespace = f (logNamespace s)}) m)
70+-- localKatipNamespace f (App m) = App (local (\\s -> s { logNamespace = f (logNamespace s)}) m)
7171-- -- with lens:
7272-- -- localKatipNamespace f (App m) = App (local (over logNamespace f) m)
7373--