From 73e7a69828597927f35e080d379278a847bed208 Mon Sep 17 00:00:00 2001
From: stuebinm
Date: Wed, 6 Apr 2022 18:05:51 +0200
Subject: server: expose jitsi rooms in maps list endpoint

---
 server/Handlers.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'server')

diff --git a/server/Handlers.hs b/server/Handlers.hs
index 39995dc..e45b210 100644
--- a/server/Handlers.hs
+++ b/server/Handlers.hs
@@ -17,7 +17,7 @@ module Handlers (
 import           Universum
 
 import           CheckDir               (DirResult (dirresultMaps))
-import           CheckMap               (MapResult (MapResult, mapresultBadges))
+import           CheckMap               (MapResult (..))
 import           Control.Concurrent.STM (TQueue, dupTChan, readTChan,
                                          writeTQueue)
 import           Data.Aeson             (ToJSON (..), (.=))
@@ -60,6 +60,7 @@ instance ToJSON MapService where
         mapInfo rev mappath MapResult { .. } = A.object
                 [ "badges" .= mapresultBadges
                 -- TODO: type-safe url library for adding the slash?
+                , "jitsi" .= mapresultJitsis
                 , "url" .= (orgUrl org <> adjustedWebPath rev org <> "/" <> toText mappath) ]
 
 
-- 
cgit v1.2.3