X-Git-Url: https://code.grnet.gr/git/ganeti-local/blobdiff_plain/0c28bee1358ba512275d6608eed9680d87f7b68c..01e524934eae5ae964c51a19ff2a1a1011f5e51a:/htools/Ganeti/Logging.hs

diff --git a/htools/Ganeti/Logging.hs b/htools/Ganeti/Logging.hs
index c717757..0cc3dd6 100644
--- a/htools/Ganeti/Logging.hs
+++ b/htools/Ganeti/Logging.hs
@@ -112,7 +112,7 @@ setupLogging logf program debug stderr_logging console syslog = do
                      Just path -> openFormattedHandler file_logging fmt $
                                   fileHandler path level
 
-  let handlers = concat [file_handlers, stderr_handlers]
+  let handlers = file_handlers ++ stderr_handlers
   updateGlobalLogger rootLoggerName $ setHandlers handlers
   -- syslog handler is special (another type, still instance of the
   -- typeclass, and has a built-in formatter), so we can't pass it in