diff --git a/compiler/main/DynFlags.hs b/compiler/main/DynFlags.hs
index 7d692ecf5529f077d4828c864315b06ed29737de..22b85b9e542604adf81aa409c04598a6eca4def5 100644
--- a/compiler/main/DynFlags.hs
+++ b/compiler/main/DynFlags.hs
@@ -1588,7 +1588,7 @@ setTmpDir dir dflags = dflags{ tmpDir = canonicalise dir }
      -- understand /cygdrive paths.)
      cygdrivePrefix = [pathSeparator] ++ "/cygdrive/" ++ [pathSeparator]
      xltCygdrive path = case maybePrefixMatch cygdrivePrefix path of
-                        Just (drive:sep:xs))
+                        Just (drive:sep:xs)
                          | isPathSeparator sep -> drive:':':pathSeparator:xs
                         _ -> path