diff options
| author | tabascoeye | 2021-12-28 15:21:03 +0000 |
|---|---|---|
| committer | stuebinm | 2022-01-02 01:55:49 +0100 |
| commit | d97398332e7747ec06d0a17cb1458c6d048b39a1 (patch) | |
| tree | aef571b214cd536353b4f38556c5f00d82982d11 | |
| parent | e914a92170333c61d50e940e045eb3152fa841b1 (diff) | |
open BBBs in new Tab so that they work now :/
PLEASE review! I have no idea of haskell
| -rw-r--r-- | lib/Properties.hs | 4 |
1 files changed, 2 insertions, 2 deletions
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 |