diff options
Diffstat (limited to 'lib/SlackBuilder/Download.hs')
| -rw-r--r-- | lib/SlackBuilder/Download.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/SlackBuilder/Download.hs b/lib/SlackBuilder/Download.hs index 53e609c..088f2cc 100644 --- a/lib/SlackBuilder/Download.hs +++ b/lib/SlackBuilder/Download.hs @@ -186,6 +186,8 @@ cloneAndArchive repo tarballPath tagPrefix = do >> createLzmaTarball repositoryTarballPath repositoryArchivePath >> removePathForcibly repositoryTarballPath +-- | Takes a directory as input and a file name as output and creates a tar.xz +-- archive from the given directory. createLzmaTarball :: FilePath -> FilePath -> IO (Digest MD5) createLzmaTarball input output = runConduitRes $ yield input .| void tarFilePath |