Remove debugging statements from the log file tracer process
commit4f4c39260fb5eb288f7d37c86ce8fc721e4eaa2e
authorTim Watson <watson.timothy@gmail.com>
dateWed 15 May 2013, 14:40 (13 years ago)
parent39feb45
src/Control/Distributed/Process/Internal/Trace/Tracer.hs−1
@@ -163,7 +163,6 @@ eventLogTracer =
163163logfileTracer :: FilePath -> Process ()
164164logfileTracer p = do
165165 -- TODO: error handling if the handle cannot be opened
166− liftIO $ putStrLn $ "writing to " ++ (show p)
167166 h <- liftIO $ openFile p AppendMode
168167 liftIO $ hSetBuffering h LineBuffering
169168 logger h `finally` (liftIO $ hClose h)