Redo PathFrom name change

src/Dodge/PlacementSpot.hs

@@ -3,8 +3,8 @@ module Dodge.PlacementSpot
     ( atFstLnkOut
     , rpIsOnPath
     , rpIsOffPath
-    , rpOffPathEdge
-    , rpOnPathEdge
+    , rpOffPathFromEdge
+    , rpOnPathFromEdge
     , useUnusedLnk
     , psRandRanges
     , useRoomPosCond
@@ -82,16 +82,16 @@ rpIsOffPath = any f . _rpType
   where
     f RoomPosOffPath {} = True
     f _ = False
-rpOffPathEdge :: PathEdge -> RoomPos -> Bool
-rpOffPathEdge pe = any f . _rpType
+rpOffPathFromEdge :: PathFromEdge -> RoomPos -> Bool
+rpOffPathFromEdge pe = any f . _rpType
   where
-    f rt = maybe False (pe `elem`) (rt ^? offPathEdges) 
+    f rt = maybe False (pe `elem`) (rt ^? offPathFromEdges) 
 
 -- test whether a roomPos is on the path with a given from edge value
-rpOnPathEdge :: PathEdge -> RoomPos -> Bool
-rpOnPathEdge pe = any f . _rpType
+rpOnPathFromEdge :: PathFromEdge -> RoomPos -> Bool
+rpOnPathFromEdge pe = any f . _rpType
   where
-    f rt = maybe False (pe `elem`) (rt ^? onPathEdges) 
+    f rt = maybe False (pe `elem`) (rt ^? onPathFromEdges) 
 
 resetPLUse :: PlacementSpot -> PlacementSpot
 resetPLUse (PSPos f g fallback) = PSPos f' g fallback