Add wire to central laser room

src/Dodge/Placement/PlaceSpot.hs

@@ -85,8 +85,7 @@ shiftPSBy (pos,rot) ps = ps
     & psPos %~ shiftPointBy (pos,rot)
     & psRot %~ (+ rot)
 
--- the Int here allows for passing parameters down to other placements:
--- button ids, etc
+-- the Int here is some id that is assigned when the placement is placed
 placeSpotID :: PlacementSpot -> PSType -> World -> (Int, World)
 placeSpotID ps pt w = case pt of
     PutTrigger cond -> placeNewInto triggers cond w