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