summaryrefslogtreecommitdiff
path: root/lib/Properties.hs
diff options
context:
space:
mode:
authorstuebinm2022-04-06 18:05:42 +0200
committerstuebinm2022-04-06 18:05:42 +0200
commit92945f9e855284534e103e4f29e069101033a62c (patch)
treec69ce5727cdd90629617382eec3aec995cd82bfb /lib/Properties.hs
parentd3dcb5f4a787657f15799744c74f9a84baf1057b (diff)
linter: collect jitsi rooms of maps
Diffstat (limited to 'lib/Properties.hs')
-rw-r--r--lib/Properties.hs7
1 files changed, 5 insertions, 2 deletions
diff --git a/lib/Properties.hs b/lib/Properties.hs
index faa6db0..18a0520 100644
--- a/lib/Properties.hs
+++ b/lib/Properties.hs
@@ -38,7 +38,7 @@ import LintConfig (LintConfig (..))
import LintWriter (LintWriter, adjust, askContext,
askFileDepth, complain, dependsOn, forbid,
lintConfig, offersBadge, offersEntrypoint,
- suggest, warn, zoom, offersCWs)
+ suggest, warn, zoom, offersCWs, offersJitsi)
import Paths (PathResult (..), RelPath (..),
getExtension, isOldStyle, parsePath)
import Types (Dep (Link, Local, LocalMap, MapLink))
@@ -363,9 +363,12 @@ checkTileThing removeExits p@(Property name _value) = case name of
suggestProperty $ Property "jitsiTrigger" "onaction"
-- prevents namespace clashes for jitsi room names
- unless ("shared" `isPrefixOf` jitsiRoom) $ do
+ if "shared" `isPrefixOf` jitsiRoom then do
assemblyname <- lintConfig configAssemblyTag
setProperty "jitsiRoom" (assemblyname <> "-" <> jitsiRoom)
+ offersJitsi (assemblyname <> "-" <> jitsiRoom)
+ else
+ offersJitsi jitsiRoom
"jitsiTrigger" -> do
isString p
unlessHasProperty "jitsiTriggerMessage"