git.iko.soy/typeable/katip
on master help sign in
Merge pull request #71 from bitemyapp/master
6afda93Michael Xavier
katip-elasticsearch/src/Katip/Scribes/ElasticSearch.hs+6−7
compare with master
unifiedsplit
@@ -14,7 +14,6 @@
14-- import Katip
14-- import Katip
15-- import Katip.Scribes.ElasticSearch
15-- import Katip.Scribes.ElasticSearch
16--
16--
17−--
18-- main :: IO ()
17-- main :: IO ()
19-- main = do
18-- main = do
20-- mgr <- newManager defaultManagerSettings
19-- mgr <- newManager defaultManagerSettings
@@ -25,12 +24,12 @@
25-- -- Reasonable for single-node in development
24-- -- Reasonable for single-node in development
26-- -- defaultEsScribeCfgV5 { essIndexSettings = IndexSettings (ShardCound 1) (ReplicaCount 0)}
25-- -- defaultEsScribeCfgV5 { essIndexSettings = IndexSettings (ShardCound 1) (ReplicaCount 0)}
27-- bhe
26-- bhe
28−-- (IndexName "all-indices-prefixed-with")
27+-- (IndexName "all-indices-prefixed-with")
29−-- (MappingName "application-logs")
28+-- (MappingName "application-logs")
30−-- DebugS
29+-- DebugS
31−-- V3
30+-- V3
32−-- let mkLogEnv = registerScribe "es" esScribe defaultScribeSettings =<< initLogEnv "MyApp" "production"
31+-- let mkLogEnv = registerScribe "es" esScribe defaultScribeSettings =<< initLogEnv \"MyApp\" "production"
33−-- bracket mkLogEnv closeScribes $ \le -> runKatipT le $ do
32+-- bracket mkLogEnv closeScribes $ \\le -> runKatipT le $ do
34-- logMsg "ns" InfoS "This goes to elasticsearch"
33-- logMsg "ns" InfoS "This goes to elasticsearch"
35--
34--
36-- @
35-- @