From d0fa82fb721cdc85438287e29a94cb796b7bc464 Mon Sep 17 00:00:00 2001
From: Joey Hess <id@joeyh.name>
Date: Sat, 11 May 2013 15:03:00 -0500
Subject: git-annex now builds on Windows (doesn't work)

---
 CmdLine.hs | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'CmdLine.hs')

diff --git a/CmdLine.hs b/CmdLine.hs
index b7b8b70f2..8f4c99269 100755
--- a/CmdLine.hs
+++ b/CmdLine.hs
@@ -17,7 +17,7 @@ import qualified Control.Exception as E
 import qualified Data.Map as M
 import Control.Exception (throw)
 import System.Console.GetOpt
-#ifndef mingw32_HOST_OS
+#ifndef __WINDOWS__
 import System.Posix.Signals
 #endif
 
@@ -118,7 +118,9 @@ tryRun' errnum state cmd (a:as) = do
 {- Actions to perform each time ran. -}
 startup :: Annex Bool
 startup = liftIO $ do
+#ifndef __WINDOWS__
 	void $ installHandler sigINT Default Nothing
+#endif
 	return True
 
 {- Cleanup actions. -}
-- 
cgit v1.2.3