Commit dfcbf782 authored by Ian Lynagh's avatar Ian Lynagh

Remove an extra ) that was breaking the build on Windows

parent c7cc711d
......@@ -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
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment