Fix archive name generation
Some checks failed
Build / audit (push) Failing after 20s
Build / test (push) Failing after 19s

This commit is contained in:
2024-05-25 07:54:05 +02:00
parent c81cabfcbf
commit 6d0248b4f8
2 changed files with 3 additions and 1 deletions

View File

@ -179,7 +179,7 @@ reuploadWithTemplate downloadTemplate commands packagePath version = do
appendTarExtension = (<.> "tar.xz")
in fmap (appendTarExtension tarballPath,)
$ withCurrentDirectory (takeDirectory tarballPath)
$ createLzmaTarball archiveBaseFilename archiveBaseFilename
$ createLzmaTarball archiveBaseFilename (appendTarExtension archiveBaseFilename)
handleReupload relativeTarball = do
liftIO $ putStrLn $ "Upload the source tarball " <> relativeTarball
uploadSource relativeTarball category'