From d97398332e7747ec06d0a17cb1458c6d048b39a1 Mon Sep 17 00:00:00 2001
From: tabascoeye
Date: Tue, 28 Dec 2021 15:21:03 +0000
Subject: open BBBs in new Tab so that they work now :/

PLEASE review! I have no idea of haskell---
 lib/Properties.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'lib')

diff --git a/lib/Properties.hs b/lib/Properties.hs
index 345f2ba..46afcb9 100644
--- a/lib/Properties.hs
+++ b/lib/Properties.hs
@@ -371,7 +371,7 @@ checkTileLayerProperty p@(Property name _value) = case name of
             && T.length room_slug >= 2  -> do
               let link = "https://rc3.world/2021/room"<>room_slug
               dependsOn (Link link)
-              setProperty "openWebsite" link
+              setProperty "openTab" link
               setProperty "silent" (BoolProp True)
               setProperty "openWebsitePolicy"
                 ("fullscreen;camera;microphone;display-capture" :: Text)
@@ -383,7 +383,7 @@ checkTileLayerProperty p@(Property name _value) = case name of
         (setProperty "openWebsiteTrigger")
       unlessHasProperty "bbbTriggerMessage" $ do
        setProperty "openWebsiteTriggerMessage"
-         ("press SPACE to enter bbb room" :: Text)
+         ("press SPACE to enter bbb room in a new tab" :: Text)
        suggest "set \"bbbTriggerMessage\" to a custom message to overwrite the\
                \default \"press SPACE to enter the bbb room\""
     "bbbTriggerMessage" -> do
-- 
cgit v1.2.3