mirror of
https://github.com/jfmengels/elm-review.git
synced 2024-09-11 08:05:46 +03:00
Extract function
This commit is contained in:
parent
2ee409c546
commit
cf2a955d40
@ -1368,7 +1368,7 @@ mergeModuleVisitorsHelp ruleName_ initialProjectContext moduleContextCreator vis
|
|||||||
)
|
)
|
||||||
emptyModuleVisitor
|
emptyModuleVisitor
|
||||||
visitors
|
visitors
|
||||||
|> (\(ModuleRuleSchema moduleVisitorSchema) -> ModuleRuleSchema moduleVisitorSchema)
|
|> removeExtensibleRecordFromModuleRuleSchema
|
||||||
, moduleContextCreator
|
, moduleContextCreator
|
||||||
)
|
)
|
||||||
|
|
||||||
@ -1408,7 +1408,12 @@ removeExtensibleRecordTypeVariable :
|
|||||||
(ModuleRuleSchema {} moduleContext -> ModuleRuleSchema { a | hasAtLeastOneVisitor : () } moduleContext)
|
(ModuleRuleSchema {} moduleContext -> ModuleRuleSchema { a | hasAtLeastOneVisitor : () } moduleContext)
|
||||||
-> (ModuleRuleSchema {} moduleContext -> ModuleRuleSchema { hasAtLeastOneVisitor : () } moduleContext)
|
-> (ModuleRuleSchema {} moduleContext -> ModuleRuleSchema { hasAtLeastOneVisitor : () } moduleContext)
|
||||||
removeExtensibleRecordTypeVariable function =
|
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
|
{-| Creates a rule that will **only** report a configuration error, which stops `elm-review` from reviewing the project
|
||||||
|
Loading…
Reference in New Issue
Block a user