jitsiRoomAdminTag: prepend "assembly-" before name

(since otherwise we might run into namespace clashes for assemblies with
funny names)

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"