Work towards making world read/showable

src/Dodge/Render/Picture.hs

@@ -13,13 +13,13 @@ import Picture
 fixedCoordPictures :: Universe -> Picture
 fixedCoordPictures u = case _menuLayers u of 
     [] -> pictures
-        [ hudDrawings cfig w
+        [ hudDrawings u
         , customMouseCursor cfig w
         ]
     (lay:_) -> setDepth (-1) . winScale cfig $ menuScreen u lay
   where 
     w = _uvWorld u
-    cfig = _config u
+    cfig = _uvConfig u
 
 customMouseCursor :: Configuration -> World -> Picture
 customMouseCursor cfig w = winScale cfig