jfmengels/elm-review
1
1
Fork 0
mirror of https://github.com/jfmengels/elm-review.git synced 2024-11-25 10:04:38 +03:00
Code Issues Packages Projects Releases Wiki Activity

Rename to extraFiles

Browse Source
This commit is contained in:
Jeroen Engels 2024-04-17 23:08:52 +02:00
parent a1cb9c05ff
commit e401d54cce
3 changed files with 11 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/Review/Project.elm
View File

@ -85,7 +85,7 @@ new =
, modulesThatFailedToParse = []
, elmJson = Nothing
, readme = Nothing
, extraFiles2 = Dict.empty
, extraFiles = Dict.empty
, extraFilesContentHash = ContentHash.nil
, extraFilesContentHashes = Dict.empty
, dependencies = Dict.empty
@ -324,7 +324,7 @@ addExtraFiles newFiles (Internal.Project project) =
in
Internal.Project
{ project
| extraFiles2 = Dict.union newFiles project.extraFiles2
| extraFiles = Dict.union newFiles project.extraFiles
, extraFilesContentHashes = extraFilesContentHashes
, extraFilesContentHash = ContentHash.combine extraFilesContentHashes
}
@ -334,7 +334,7 @@ addExtraFiles newFiles (Internal.Project project) =
-}
extraFiles : Project -> Dict String String
extraFiles (Internal.Project project) =
project.extraFiles2
project.extraFiles
{-| Add a dependency to the project. These will be available for rules to make

2
src/Review/Project/Internal.elm
View File

@ -25,7 +25,7 @@ type Project
, modulesThatFailedToParse : List { path : String, source : String }
, elmJson : Maybe ( { path : String, raw : String, project : Elm.Project.Project }, ContentHash )
, readme : Maybe ( { path : String, content : String }, ContentHash )
, extraFiles2 : Dict {- path -} String {- content -} String
, extraFiles : Dict {- path -} String {- content -} String
, extraFilesContentHash : ContentHash
, extraFilesContentHashes : Dict {- path -} String ContentHash
, dependencies : Dict String Dependency

14
src/Review/Project/Valid.elm
View File

@ -55,7 +55,7 @@ type alias ValidProjectData =
, modulesByModuleName : Dict ModuleName OpaqueProjectModule
, elmJson : Maybe ( { path : String, raw : String, project : Elm.Project.Project }, ContentHash )
, readme : Maybe ( { path : String, content : String }, ContentHash )
, extraFiles2 : Dict {- path -} String {- content -} String
, extraFiles : Dict {- path -} String {- content -} String
, extraFilesContentHash : ContentHash
, extraFilesContentHashes : Dict {- path -} String ContentHash
, dependencies : Dict String Dependency
@ -75,7 +75,7 @@ toRegularProject (ValidProject validProject) =
, modulesThatFailedToParse = []
, elmJson = validProject.elmJson
, readme = validProject.readme
, extraFiles2 = validProject.extraFiles2
, extraFiles = validProject.extraFiles
, extraFilesContentHash = validProject.extraFilesContentHash
, extraFilesContentHashes = validProject.extraFilesContentHashes
, dependencies = validProject.dependencies
@ -144,7 +144,7 @@ fromProjectAndGraph moduleGraph_ acyclicGraph (Project project) =
, modulesByModuleName = computeModulesByModuleName project.modules
, elmJson = project.elmJson
, readme = project.readme
, extraFiles2 = project.extraFiles2
, extraFiles = project.extraFiles
, extraFilesContentHash = project.extraFilesContentHash
, extraFilesContentHashes = project.extraFilesContentHashes
, dependencies = project.dependencies
@ -330,14 +330,14 @@ type alias ExtraFileData fileKey =
extraFiles : ({ path : String, content : String } -> fileKey) -> ValidProject -> ExtraFileData fileKey
extraFiles toFileKey (ValidProject project) =
{ withFileKeys = Dict.map (\path content -> { fileKey = toFileKey { path = path, content = content }, content = content }) project.extraFiles2
, withoutFileKeys = project.extraFiles2
{ withFileKeys = Dict.map (\path content -> { fileKey = toFileKey { path = path, content = content }, content = content }) project.extraFiles
, withoutFileKeys = project.extraFiles
}
extraFilesWithoutKeys : ValidProject -> Dict String String
extraFilesWithoutKeys (ValidProject project) =
project.extraFiles2
project.extraFiles
extraFilesHash : ValidProject -> ContentHash
@ -547,7 +547,7 @@ addExtraFile file (ValidProject project) =
in
ValidProject
{ project
| extraFiles2 = Dict.insert file.path file.content project.extraFiles2
| extraFiles = Dict.insert file.path file.content project.extraFiles
, extraFilesContentHashes = extraFilesContentHashes
, extraFilesContentHash = ContentHash.combine extraFilesContentHashes
}