clean up
This commit is contained in:
parent
18084d997c
commit
bd106e22f1
1 changed files with 1 additions and 3 deletions
|
@ -106,9 +106,7 @@ installFile top f = do
|
|||
createDirectoryIfMissing True destdir
|
||||
void $ copyFileExternal f destdir
|
||||
where
|
||||
-- Note: This is an absolute, not a relative, directory.
|
||||
dir = parentDir f
|
||||
destdir = inTop top dir
|
||||
destdir = inTop top $ parentDir f
|
||||
|
||||
-- Note that f is not relative, so cannot use </>
|
||||
inTop :: FilePath -> FilePath -> FilePath
|
||||
|
|
Loading…
Add table
Reference in a new issue