diff --git a/Messages/Concurrent.hs b/Messages/Concurrent.hs
index e4bc647b97..a4710e3106 100644
--- a/Messages/Concurrent.hs
+++ b/Messages/Concurrent.hs
@@ -11,11 +11,11 @@
 
 module Messages.Concurrent where
 
-import Common
 import Annex
-import Types.Messages
 
 #ifdef WITH_CONCURRENTOUTPUT
+import Common
+import Types.Messages
 import qualified System.Console.Concurrent as Console
 import qualified System.Console.Regions as Regions
 import Control.Concurrent.STM