Question

我有一个简单的hello world happstack app：

module Main where

import Happstack.Server (nullConf, simpleHTTP, toResponse, ok)

main :: IO ()
main = simpleHTTP nullConf $ ok "Hello, World!"

我希望它将请求记录到stdout。

我发现这个http://happstack.wordpress.com/2009/02/26/happstack-now-outputs-apache-combined-logs/表示它正在输出日志，但它们不是stdout。我之前从未使用过hslogger，并且无法确定如何配置它，以及b）将它连接到happstack。 nullConf提供了默认logMAccess，但目前尚不清楚hslogger中的结果如何。

Answer 1

在我发布之后，我发现了这个：http://www.haskell.org/pipermail/beginners/2011-August/008184.html，它给了我所需的线索。

module Main where

import Happstack.Server (nullConf, simpleHTTP, toResponse, ok)

import System.IO
import System.Log.Logger ( updateGlobalLogger
                         , rootLoggerName
                         , setLevel
                         , Priority(..)
                         )

main :: IO ()
main = do
  updateGlobalLogger rootLoggerName (setLevel INFO)

  simpleHTTP nullConf $ ok "Hello, World!"

如何将Happstack日志发送到stdout？

1 个答案: