From cdb091046df56d96775ae4409a7b80011e640eca Mon Sep 17 00:00:00 2001
From: Luite Stegeman <stegeman@gmail.com>
Date: Sat, 10 Sep 2011 01:22:56 +0200
Subject: [PATCH] fix warning on Windows

---
 yesod/main.hs | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/yesod/main.hs b/yesod/main.hs
index c461c66a..988edfc6 100755
--- a/yesod/main.hs
+++ b/yesod/main.hs
@@ -25,7 +25,9 @@ main = do
                 "--dev":rest -> (True, rest)
                 _ -> (False, args')
     let cmd = if isDev then "cabal-dev" else "cabal"
+#ifndef WINDOWS
     let build rest = rawSystem cmd $ "build":rest
+#endif
     case args of
         ["init"] -> scaffold
 #ifndef WINDOWS