From 1a9a6771aeb8a0c65d6eedc89d9f04750b5ed17b Mon Sep 17 00:00:00 2001 From: Jeroen Engels Date: Tue, 7 May 2024 23:17:36 +0200 Subject: [PATCH] Add lookup table --- tests/Css/NoUnusedClasses.elm | 12 ++++++++++-- 1 file changed, 10 insertions(+), 2 deletions(-) diff --git a/tests/Css/NoUnusedClasses.elm b/tests/Css/NoUnusedClasses.elm index fea772e2..308ac745 100644 --- a/tests/Css/NoUnusedClasses.elm +++ b/tests/Css/NoUnusedClasses.elm @@ -8,6 +8,7 @@ import Elm.Syntax.Node as Node exposing (Node) import Elm.Syntax.Range exposing (Range) import Regex exposing (Regex) import Review.FilePattern as FilePattern exposing (FilePattern) +import Review.ModuleNameLookupTable exposing (ModuleNameLookupTable) import Review.Rule as Rule exposing (Rule) import Set exposing (Set) @@ -79,7 +80,8 @@ type alias ProjectContext = type alias ModuleContext = - { usedCssClasses : Set String + { lookupTable : ModuleNameLookupTable + , usedCssClasses : Set String } @@ -92,7 +94,13 @@ initialProjectContext = fromProjectToModule : Rule.ContextCreator ProjectContext ModuleContext fromProjectToModule = - Rule.initContextCreator (\_ -> { usedCssClasses = Set.empty }) + Rule.initContextCreator + (\lookupTable _ -> + { lookupTable = lookupTable + , usedCssClasses = Set.empty + } + ) + |> Rule.withModuleNameLookupTable fromModuleToProject : Rule.ContextCreator ModuleContext ProjectContext