Skip to content
Snippets Groups Projects
Commit 4b2059b5 authored by stuebinm's avatar stuebinm
Browse files

the lobby lacks reflexivity

parent 7675ee18
Branches
No related tags found
No related merge requests found
...@@ -21,7 +21,7 @@ import GHC.Generics (Generic) ...@@ -21,7 +21,7 @@ import GHC.Generics (Generic)
import Badges (Badge) import Badges (Badge)
import LintConfig (LintConfig') import LintConfig (LintConfig', LintConfig (configAssemblyTag))
import LintWriter (LintResult, invertLintResult, import LintWriter (LintResult, invertLintResult,
resultToAdjusted, resultToBadges, resultToAdjusted, resultToBadges,
resultToDeps, resultToLints, resultToOffers, resultToDeps, resultToLints, resultToOffers,
...@@ -106,6 +106,7 @@ runLinter isMain config tiledmap depth = MapResult ...@@ -106,6 +106,7 @@ runLinter isMain config tiledmap depth = MapResult
where where
linksLobby = \case linksLobby = \case
MapLink link -> "/@/rc3_21/lobby" `T.isPrefixOf` link MapLink link -> "/@/rc3_21/lobby" `T.isPrefixOf` link
|| configAssemblyTag config == "lobby"
_ -> False _ -> False
layerDeps = concatMap resultToDeps layer layerDeps = concatMap resultToDeps layer
layer = checkLayerRec config depth (V.toList $ tiledmapLayers tiledmap) layer = checkLayerRec config depth (V.toList $ tiledmapLayers tiledmap)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment