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

Extract function

Browse Source
This commit is contained in:
Jeroen Engels 2023-09-03 11:36:24 +02:00
parent 2ee409c546
commit cf2a955d40
1 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
src/Review/Rule.elm
View File

@ -1368,7 +1368,7 @@ mergeModuleVisitorsHelp ruleName_ initialProjectContext moduleContextCreator vis
)
emptyModuleVisitor
visitors
|> (\(ModuleRuleSchema moduleVisitorSchema) -> ModuleRuleSchema moduleVisitorSchema)
|> removeExtensibleRecordFromModuleRuleSchema
, moduleContextCreator
)
@ -1408,7 +1408,12 @@ removeExtensibleRecordTypeVariable :
(ModuleRuleSchema {} moduleContext -> ModuleRuleSchema { a | hasAtLeastOneVisitor : () } moduleContext)
-> (ModuleRuleSchema {} moduleContext -> ModuleRuleSchema { hasAtLeastOneVisitor : () } moduleContext)
removeExtensibleRecordTypeVariable function =
function >> (\(ModuleRuleSchema param) -> ModuleRuleSchema param)
function >> removeExtensibleRecordFromModuleRuleSchema
removeExtensibleRecordFromModuleRuleSchema : ModuleRuleSchema schemaState moduleContext -> ModuleRuleSchema a moduleContext
removeExtensibleRecordFromModuleRuleSchema (ModuleRuleSchema param) =
ModuleRuleSchema param
{-| Creates a rule that will **only** report a configuration error, which stops `elm-review` from reviewing the project