Add RoomCluster ideas

2022-06-09 12:30:34 +01:00
parent 9252c48d2b
commit 785dbba5ef
6 changed files with 139 additions and 3 deletions
@@ -31,4 +31,7 @@ defaultRoom = Room
    , _rmMParent    = Nothing
    , _rmChildren   = []
    , _rmType       = DefaultRoomType
+    , _rmClusterStatus = defaultClusterStatus
    }
+defaultClusterStatus :: ClusterStatus
+defaultClusterStatus = ClusterStatus "defRoomClust" S.empty