Remove an extra ) that was breaking the build on Windows
authorIan Lynagh <igloo@earth.li>
Mon, 14 Jan 2008 10:39:53 +0000 (10:39 +0000)
committerIan Lynagh <igloo@earth.li>
Mon, 14 Jan 2008 10:39:53 +0000 (10:39 +0000)
compiler/main/DynFlags.hs

index 7d692ec..22b85b9 100644 (file)
@@ -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