X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=Setup.hs;h=aedd52b323397cad31c7092e8546cfb9365f3d2a;hb=a2f811942f782158671fd6dbba94daf5d8ecb0e1;hp=3c0051d07ad86055d9066f09613f99a918b3eb3d;hpb=76c57ed48607324ec4a89b55f29a47be980fb2c0;p=ghc-prim.git

diff --git a/Setup.hs b/Setup.hs
index 3c0051d..aedd52b 100644
--- a/Setup.hs
+++ b/Setup.hs
@@ -16,15 +16,15 @@ import System.Directory
 import Control.Exception (try)
 
 main :: IO ()
-main = do let hooks = defaultUserHooks {
+main = do let hooks = simpleUserHooks {
                   regHook = addPrimModule
-                          $ regHook defaultUserHooks,
+                          $ regHook simpleUserHooks,
                   buildHook = build_primitive_sources
-                            $ buildHook defaultUserHooks,
+                            $ buildHook simpleUserHooks,
                   makefileHook = build_primitive_sources
-                               $ makefileHook defaultUserHooks,
+                               $ makefileHook simpleUserHooks,
                   haddockHook = build_primitive_sources
-                               $ haddockHook defaultUserHooks }
+                               $ haddockHook simpleUserHooks }
           defaultMainWithHooks hooks
 
 type Hook a = PackageDescription -> LocalBuildInfo -> UserHooks -> a -> IO ()