1
0
forked from GitHub/gf-core

bugfix in Setup.hs for Linux

This commit is contained in:
krasimir
2009-10-15 06:44:40 +00:00
parent 0b9c38569c
commit d31e2fe040

View File

@@ -111,7 +111,7 @@ copyRGL args flags pkg lbi = do
copyAll s from to = do
putStrLn $ "Installing [" ++ s ++ "] " ++ to
createDirectoryIfMissing True to
files <- fmap (drop 2) $ getDirectoryContents from
files <- fmap (filter (\f -> take 1 f /= ".")) $ getDirectoryContents from
mapM_ (\file -> copyFile (from </> file) (to </> file)) files
sdistRGL pkg mb_lbi hooks flags = do