Commit before static wall change

2021-04-27 22:01:03 +02:00
parent 6d229f8de2
commit 2085d5a048
9 changed files with 10 additions and 19 deletions
@@ -121,7 +121,6 @@ addPane :: Color -> (Point2,Point2) -> IM.IntMap Wall -> IM.IntMap Wall
 addPane c (p0,p1) wls = IM.insert (newKey wls) (Wall { _wlLine = [p0,p1]
                                                     , _wlID = newKey wls
                                                     , _wlColor = c
-                                                     , _wlDraw = Nothing
                                                     , _wlSeen = False 
                                                     , _wlIsSeeThrough = True
                                                     }