From a694d06c7243e4c670a54cae00938cd9f70db8c7 Mon Sep 17 00:00:00 2001
From: Ross Paterson <ross@soi.city.ac.uk>
Date: Mon, 1 May 2006 15:48:47 +0000
Subject: [PATCH] fix previous patch

---
 System/Directory.hs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/System/Directory.hs b/System/Directory.hs
index 0ea1d47..bdd7f3c 100644
--- a/System/Directory.hs
+++ b/System/Directory.hs
@@ -599,7 +599,7 @@ foreign import stdcall unsafe "SearchPathA"
                          -> CString
                          -> Ptr CString
                          -> IO CInt
-# if defined(__GLASGOW_HASKELL__)
+# if !defined(__GLASGOW_HASKELL__)
 long_path_size :: Int
 long_path_size = 4096
 # endif
-- 
1.7.10.4