git.iko.soy/elk
on master help sign in
write the LICENSE when downloading packages
fcb0c36Evan Czaplicki
builder/src/File.hs+1−1
compare with master
unifiedsplit
@@ -171,7 +171,7 @@ writeEntry destination root entry =
171 let
171 let
172 path = drop root (Zip.eRelativePath entry)
172 path = drop root (Zip.eRelativePath entry)
173 in
173 in
174− if List.isPrefixOf "src/" path then
174+ if path == "LICENSE" || List.isPrefixOf "src/" path then
175 if not (null path) && last path == '/'
175 if not (null path) && last path == '/'
176 then Dir.createDirectoryIfMissing True (destination </> path)
176 then Dir.createDirectoryIfMissing True (destination </> path)
177 else LBS.writeFile (destination </> path) (Zip.fromEntry entry)
177 else LBS.writeFile (destination </> path) (Zip.fromEntry entry)