diff options
Diffstat (limited to 'lib/Properties.hs')
| -rw-r--r-- | lib/Properties.hs | 7 |
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" |