diff --git a/Setup.hs b/Setup.hs index 8a426d1dd..a2527a843 100644 --- a/Setup.hs +++ b/Setup.hs @@ -28,7 +28,7 @@ main = defaultMainWithHooks simpleUserHooks{ preBuild = gfPreBuild , postInst = gfPostInst , preCopy = const . checkRGLArgs , postCopy = gfPostCopy - , sDistHook = sdistRGL +-- , sDistHook = sdistRGL } where gfPreBuild args = gfPre args . buildDistPref @@ -164,7 +164,7 @@ copyAll s from to = do putStrLn $ "Installing [" ++ s ++ "] " ++ to createDirectoryIfMissing True to mapM_ (\file -> copyFile (from file) (to file)) =<< ls from - +{- sdistRGL pkg mb_lbi hooks flags = do paths <- getRGLFiles rgl_src_dir [] let pkg' = pkg{dataFiles=paths} @@ -181,7 +181,7 @@ sdistRGL pkg mb_lbi hooks flags = do then return (path : paths) else return paths else getRGLFiles path paths - +-} rgl_src_dir = "lib" "src" rgl_dst_dir lbi = buildDir lbi "rgl"