mirror of
https://github.com/input-output-hk/foliage.git
synced 2024-09-11 20:27:09 +03:00
Maybe fix issue
This commit is contained in:
parent
20049b1e81
commit
234f8fcbf1
@ -120,6 +120,7 @@ buildAction
|
||||
packageVersions
|
||||
|
||||
targetKeys <- maybeReadKeysAt "target"
|
||||
|
||||
metadataEntries <-
|
||||
forP packageVersions $ \ppv@PreparedPackageVersion {pkgId, pkgTimestamp} -> do
|
||||
let PackageIdentifier {pkgName, pkgVersion} = pkgId
|
||||
@ -279,7 +280,7 @@ prepareIndexPkgCabal pkgId timestamp filePath = do
|
||||
|
||||
prepareIndexPkgMetadata :: Maybe UTCTime -> PreparedPackageVersion -> Action Targets
|
||||
prepareIndexPkgMetadata expiryTime PreparedPackageVersion {pkgId, sdistPath} = do
|
||||
targetFileInfo <- computeFileInfoSimple' sdistPath
|
||||
targetFileInfo <- liftIO $ computeFileInfoSimple sdistPath
|
||||
let packagePath = repoLayoutPkgTarGz hackageRepoLayout pkgId
|
||||
return
|
||||
Targets
|
||||
|
Loading…
Reference in New Issue
Block a user