Cleanup

src/Dodge/Data/Wall.hs

@@ -13,13 +13,11 @@ import Data.Aeson.TH
 import Dodge.Data.Material
 import Dodge.Data.Wall.Structure
 import Geometry
-import qualified Data.Set as S
 
 data Wall = Wall
     { _wlLine :: (Point2, Point2)
     , _wlID :: Int
     , _wlOpacity :: Opacity
---    , _wlPathFlag :: S.Set WallFlag
     , _wlTouchThrough :: Bool
     , _wlUnshadowed :: Bool
     , _wlRotateTo :: Bool