diff --git a/libraries/base/LwConc/Substrate.hs b/libraries/base/LwConc/Substrate.hs
index a57f4c47ce70..52ccd901fb15 100644
--- a/libraries/base/LwConc/Substrate.hs
+++ b/libraries/base/LwConc/Substrate.hs
@@ -109,7 +109,7 @@ module LwConc.Substrate
 
 , getNumCapabilities       -- IO Int
 , getCurrentCapability     -- PTM Int
-, getCurrentCapabilityIO	 -- IO Int
+, getCurrentCapabilityIO   -- IO Int
 
 , setSContCapability       -- SCont -> Int -> IO ()
 , getSContCapability       -- SCont -> PTM Int