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

Don't return a Maybe

Browse Source
This commit is contained in:
Jeroen Engels 2023-04-08 22:04:40 +02:00
parent 248dc2b23f
commit 48a5b0ad41
2 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -494,7 +494,6 @@ addReadme readme_ (ValidProject project) =
ValidProject { project | readme = Just ( readme_, ContentHash.hash readme_.content ) } ValidProject { project | readme = Just ( readme_, ContentHash.hash readme_.content ) }
addElmJson : { path : String, raw : String, project : Elm.Project.Project } -> ValidProject -> Maybe ValidProject addElmJson : { path : String, raw : String, project : Elm.Project.Project } -> ValidProject -> ValidProject
addElmJson elmJson_ (ValidProject project) = addElmJson elmJson_ (ValidProject project) =
ValidProject { project | elmJson = Just ( elmJson_, ContentHash.hash elmJson_.raw ) } ValidProject { project | elmJson = Just ( elmJson_, ContentHash.hash elmJson_.raw ) }
|> Just

2
src/Review/Rule.elm
View File

@ -5120,7 +5120,7 @@ findFixHelp project fixablePredicate errors maybeModuleZipper =
Just elmJson -> Just elmJson ->
case case
InternalFix.fixElmJson fixes elmJson.raw InternalFix.fixElmJson fixes elmJson.raw
|> Maybe.andThen |> Maybe.map
(\fixResult -> (\fixResult ->
ValidProject.addElmJson { path = elmJson.path, raw = fixResult.raw, project = fixResult.project } project ValidProject.addElmJson { path = elmJson.path, raw = fixResult.raw, project = fixResult.project } project
) )