From dfcbf782fc0571014e1d3302d38b33537142159a Mon Sep 17 00:00:00 2001 From: Ian Lynagh Date: Mon, 14 Jan 2008 10:39:53 +0000 Subject: [PATCH] Remove an extra ) that was breaking the build on Windows --- compiler/main/DynFlags.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/compiler/main/DynFlags.hs b/compiler/main/DynFlags.hs index 7d692ec..22b85b9 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 -- 1.7.10.4