Fix bug in detecting which room you are in

src/Dodge/Default/Room.hs

@@ -4,10 +4,11 @@ import Dodge.Room.Data
 
 defaultRoom :: Room
 defaultRoom = Room
-    { _rmPolys = []
-    , _rmLinks = []
-    , _rmPath = []
-    , _rmPS = []
-    , _rmBound = []
-    , _rmFloor = []
+    { _rmPolys  = []
+    , _rmLinks  = []
+    , _rmPath   = []
+    , _rmPS     = []
+    , _rmBound  = []
+    , _rmFloor  = []
+    , _rmName   = "defaultRoom"
     }

src/Dodge/Default/World.hs

@@ -42,7 +42,7 @@ defaultWorld = World
     , _floorTiles = []
     , _randGen = mkStdGen 2
     , _mousePos = V2 0 0
-    , _testString = []
+    , _testString = const []
     , _yourID = 0
     , _worldEvents = id
     , _pressPlates = IM.empty