From d0dc669c495f5f9e3dae20481e0aae183f606519 Mon Sep 17 00:00:00 2001 From: stuebinm Date: Tue, 2 Nov 2021 22:00:34 +0100 Subject: monad plumbing to let the linter modify things I'm not sure if this is the right approach tbh — it lets the LintWriter monad modify its own context, but maybe we might run into cases where lints and modifications depend on each other across longer "distances" than just the context of the linter (i.e. just across a property?) --- lib/Properties.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lib/Properties.hs') diff --git a/lib/Properties.hs b/lib/Properties.hs index 65782c8..403df8e 100644 --- a/lib/Properties.hs +++ b/lib/Properties.hs @@ -88,7 +88,7 @@ checkTileset = do mapM_ checkTilesetProperty (fromMaybe [] $ tilesetProperties tileset) checkTilesetProperty :: Property -> LintWriter Tileset -checkTilesetProperty p@(Property name value) = case name of +checkTilesetProperty (Property name _value) = case name of "copyright" -> pure () -- only allow some licenses? _ -> pure () -- are there any other properties? -- cgit v1.2.3