Commit before generalising FromWest/South etc

2022-06-14 10:37:24 +01:00
parent d17f83928a
commit 4a910566e6
14 changed files with 137 additions and 126 deletions
@@ -71,7 +71,7 @@ randomChallenges = shootingRange
 runPastStart :: RandomGen g => Int -> State g (Tree Room)
 runPastStart i = do
    s <- rezBoxStart
-    rp <- lookedStart i
+    rp <- lockedStart i
    return . shiftChildren $ attachTree toOnward rp $ fmap ([],) s