tweak to Configure for windows. removed DefaultSetup since it breaks windows...

tweak to Configure for windows. removed DefaultSetup since it breaks windows cabal 1.0 installations.

Cabal.cabal

@@ -49,35 +49,3 @@ Other-Modules:
         Distribution.Compat.Exception,
         Distribution.Compat.RawSystem
 Extensions: CPP
-
-executable: cabal-setup
-main-is: DefaultSetup.lhs
-hs-source-dir: src
-Other-Modules:
-        Distribution.Compat.ReadP,
-        Distribution.Extension,
-        Distribution.InstalledPackageInfo,
-        Distribution.License,
-        Distribution.Make,
-        Distribution.Package,
-        Distribution.PackageDescription,
-        Distribution.ParseUtils,
-        Distribution.PreProcess,
-        Distribution.PreProcess.Unlit,
-        Distribution.Setup,
-        Distribution.Simple,
-        Distribution.Simple.Build,
-        Distribution.Simple.Configure,
-        Distribution.Simple.GHCPackageConfig,
-        Distribution.Simple.Install,
-        Distribution.Simple.LocalBuildInfo,
-        Distribution.Simple.Register,
-        Distribution.Simple.SrcDist,
-        Distribution.Simple.Utils,
-        Distribution.Compat.FilePath,
-        Distribution.Version,
-        Distribution.GetOpt,
-        Distribution.Compat.Directory,
-        Distribution.Compat.Exception,
-        Distribution.Compat.RawSystem
-Extensions: CPP

src/Distribution/Simple/Configure.hs

@@ -253,7 +253,7 @@ system_default_prefix =
     csidl_PROGRAM_FILES = 0x0026
     long_path_size      = 1024
 
-foreign import stdcall unsafe "SHGetFolderPath" 
+foreign import stdcall unsafe "SHGetFolderPathW" 
             c_SHGetFolderPath :: Ptr () 
                               -> CInt 
                               -> Ptr ()