stopLogger :: Logger -> IO ()
stopLogger lg = withMVar (_loggingThread lg) killThread
stopLogger :: Logger -> IO ()
stopLogger lg = withMVar (_loggingThread lg) killThread
stopLogger lg = withMVar (_loggingThread lg) killThread