Commit before checking where mounted lights became misplaced

2025-10-04 00:34:45 +01:00
parent a642198bfc
commit aba855e0a6
3 changed files with 3 additions and 4 deletions
@@ -4,7 +4,6 @@ module Dodge.Room.Ngon where
 import Dodge.Room.Path
 import Data.List
 import qualified Data.Set as S
--import Data.Maybe
 import Data.Tile
 import Dodge.Data.GenWorld
 import Dodge.Default.Room
@@ -20,7 +19,7 @@ roomNgon n x = do
    return
        defaultRoom
            { _rmPolys = [poly]
-            , _rmLinks = map f lnks -- muout (init lnks) ++ muin[last lnks]
+            , _rmLinks = map f lnks
            , _rmPath = linksGridToPath (map f lnks) path4
            , _rmPmnts = [thelight]
            , _rmBound = [poly]