More hlinting

2025-12-21 19:27:49 +00:00
parent 2fbaa47c0b
commit 51c52ace7d
18 changed files with 41 additions and 46 deletions
@@ -429,7 +429,7 @@ distributerRoom atype aamount = do
            (PutMachine (reverse $ polyCirc 4 20) mcstore Nothing) & plExternalID ?~ i
        dst gw = let mj = gw ^? genPmnt . ix i . plMID . _Just
            in  putTerminal (mcdist mj) (defaultTerminal & tmBootLines .~ tmDistributeLines)
-                    & plSpot .~ (unusedOffPathAwayFromLink 50)
+                    & plSpot .~ unusedOffPathAwayFromLink 50
                    & plExternalID ?~ i1
        thepipe gw = 
            let p1 = gw ^?! genPmnt . ix i . plSpot . psPos