summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorstuebinm2021-11-30 00:23:13 +0100
committerstuebinm2021-11-30 00:23:13 +0100
commit46b4591532f9ecf16bf382fded5fa5fd413527ac (patch)
treea629bfe53bdff3f5ac31e546c7e1756158fbe2da /lib
parentf1c6de8f74c2a410e7ac06df30293060d72fc8a0 (diff)
jitsiRoomAdminTag: prepend "assembly-" before name
(since otherwise we might run into namespace clashes for assemblies with funny names)
Diffstat (limited to '')
-rw-r--r--lib/Properties.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/Properties.hs b/lib/Properties.hs
index 5720f42..262f427 100644
--- a/lib/Properties.hs
+++ b/lib/Properties.hs
@@ -27,6 +27,7 @@ import LintWriter (LintWriter, adjust, askContext, askFileDepth,
import Paths (PathResult (..), RelPath (..), parsePath)
import Types (Dep (Link, Local, LocalMap, MapLink))
import Uris (SubstError (..), applySubst)
+import Data.Functor ((<&>))
-- | Checks an entire map for "general" lints.
@@ -151,6 +152,7 @@ checkLayerProperty p@(Property name _value) = case name of
"jitsiRoom" -> do
lintConfig configAssemblyTag
>>= setProperty "jitsiRoomAdminTag"
+ . ("assembly-" <>) -- prepend "assembly-" to avoid namespace clashes
uselessEmptyLayer
unwrapString' p
$ suggestProperty $ Property "jitsiTrigger" "onaction"