Allow for assigning attach items orientations

2024-09-30 16:09:56 +01:00
parent fd8adcea92
commit d8d3a01f06
10 changed files with 143 additions and 69 deletions
@@ -164,7 +164,7 @@ floorItemSPic :: FloorItem -> SPic
 floorItemSPic flit =
    uncurryV translateSPxy (_flItPos flit) $
        rotateSP (_flItRot flit) 
-            (itemSPic $ singleLDT ((_flIt flit),UncomposableIsolateSF,LTest (const Nothing) (const Nothing)))
+            (itemSPic $ singleLDT ((_flIt flit),UncomposableIsolateSF))

 btSPic :: Button -> SPic
 btSPic bt =