Combine extraFileHashes when turning into a ValidProject

This commit is contained in:
Jeroen Engels 2024-04-19 23:42:06 +02:00
parent e401d54cce
commit 72b9650579
3 changed files with 1 additions and 5 deletions

View File

@ -86,7 +86,6 @@ new =
, elmJson = Nothing
, readme = Nothing
, extraFiles = Dict.empty
, extraFilesContentHash = ContentHash.nil
, extraFilesContentHashes = Dict.empty
, dependencies = Dict.empty
, moduleGraph = Nothing
@ -326,7 +325,6 @@ addExtraFiles newFiles (Internal.Project project) =
{ project
| extraFiles = Dict.union newFiles project.extraFiles
, extraFilesContentHashes = extraFilesContentHashes
, extraFilesContentHash = ContentHash.combine extraFilesContentHashes
}

View File

@ -26,7 +26,6 @@ type Project
, elmJson : Maybe ( { path : String, raw : String, project : Elm.Project.Project }, ContentHash )
, readme : Maybe ( { path : String, content : String }, ContentHash )
, extraFiles : Dict {- path -} String {- content -} String
, extraFilesContentHash : ContentHash
, extraFilesContentHashes : Dict {- path -} String ContentHash
, dependencies : Dict String Dependency
, moduleGraph : Maybe (Graph FilePath ())

View File

@ -76,7 +76,6 @@ toRegularProject (ValidProject validProject) =
, elmJson = validProject.elmJson
, readme = validProject.readme
, extraFiles = validProject.extraFiles
, extraFilesContentHash = validProject.extraFilesContentHash
, extraFilesContentHashes = validProject.extraFilesContentHashes
, dependencies = validProject.dependencies
, moduleGraph = Just validProject.moduleGraph
@ -145,7 +144,7 @@ fromProjectAndGraph moduleGraph_ acyclicGraph (Project project) =
, elmJson = project.elmJson
, readme = project.readme
, extraFiles = project.extraFiles
, extraFilesContentHash = project.extraFilesContentHash
, extraFilesContentHash = ContentHash.combine project.extraFilesContentHashes
, extraFilesContentHashes = project.extraFilesContentHashes
, dependencies = project.dependencies
, directDependencies = directDependencies_