summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorstuebinm2021-11-30 00:27:35 +0100
committerstuebinm2021-11-30 00:27:35 +0100
commit7033597e239d37fd14890c96ae5f07b94a15953d (patch)
treec4262dcab7cdcb21dff76704e78fcb20f1be24e9 /lib
parent46b4591532f9ecf16bf382fded5fa5fd413527ac (diff)
prepend jitsi room names with assembly tag
(to prevent name clashes between assemblies; shared jitsi rooms are still possible simply by letting their names start with "shared-")
Diffstat (limited to '')
-rw-r--r--lib/Properties.hs9
1 files changed, 7 insertions, 2 deletions
diff --git a/lib/Properties.hs b/lib/Properties.hs
index 262f427..7772c26 100644
--- a/lib/Properties.hs
+++ b/lib/Properties.hs
@@ -154,8 +154,13 @@ checkLayerProperty p@(Property name _value) = case name of
>>= setProperty "jitsiRoomAdminTag"
. ("assembly-" <>) -- prepend "assembly-" to avoid namespace clashes
uselessEmptyLayer
- unwrapString' p
- $ suggestProperty $ Property "jitsiTrigger" "onaction"
+ unwrapString p $ \jitsiRoom -> do
+ suggestProperty $ Property "jitsiTrigger" "onaction"
+
+ -- prepend jitsi room names to avoid name clashes
+ unless ("shared-" `isPrefixOf` jitsiRoom) $ do
+ assemblyname <- lintConfig configAssemblyTag
+ setProperty "jitsiRoom" (assemblyname <> "-" <> jitsiRoom)
"jitsiTrigger" -> do
isString p
unlessHasProperty "jitsiTriggerMessage"