@@ -130,13 +130,13 @@ compileLibraries lbi = do
130130 arg = Just [("Elm_datadir", rtd_c)]
131131 handle <- runProcess elm_c args Nothing arg Nothing Nothing Nothing
132132 exitCode <- waitForProcess handle
133− rawSystem doc_c [file]
134133 return ( out_c </> replaceExtension file "elmo"
135134 , out_c </> replaceExtension file "elmi")
136135
137136 setCurrentDirectory "libraries"
138− files <- getFiles ".elm" "."
139− files <- unzip `fmap` mapM make files
137+ paths <- getFiles ".elm" "."
138+ files <- unzip `fmap` mapM make paths
139+ mapM_ (\path -> rawSystem doc_c [path]) paths
140140 setCurrentDirectory ".."
141141 return files
142142