Tweak display, scrolling of item values

src/Dodge/Data/CWorld.hs

@@ -19,14 +19,13 @@ import Data.Aeson.TH
 import Dodge.GameRoom
 import Geometry.ConvexPoly
 import Dodge.Data.Camera
-import qualified Data.IntSet as IS
 import Data.Graph.Inductive
 
 data CWorld = CWorld
     { _lWorld :: LWorld
     , _cwGen :: CWGen
     , _cClock :: Int
-    , _seenWalls :: IS.IntSet
+--    , _seenWalls :: IS.IntSet
     , _cwTiles :: [Tile]
     , _pathGraph :: Gr Point2 PathEdge
     , _numberFloorVerxs :: Int