Broadcasting works

This commit is contained in:
qvalentin 2023-02-07 20:30:25 +01:00
parent 7c8394f0fd
commit b0ebeda23a
5 changed files with 58 additions and 54 deletions

View file

@ -5,13 +5,13 @@ module Types.UsersData
)
where
import ClassyPrelude
import Data.Aeson (ToJSON)
import Types.RoomData (RoomsData)
import ClassyPrelude
import Data.Aeson (ToJSON)
import Types.RoomData (RoomsData)
data UsersData = UsersData
{ roomsData :: RoomsData,
userWithOutRoom :: UsersWithoutRoom
{ roomsData :: RoomsData,
usersWithOutRoom :: UsersWithoutRoom
}
deriving (Generic, Show)