justin/loop
1
0
Fork 0
Code Issues Pull Requests 1 Packages Projects Releases Wiki Activity

Simplify button drawing

Browse Source
This commit is contained in:
justin
2025-06-25 15:40:12 +01:00
parent bf0bc22720
commit 6e9d4918a1
9 changed files with 40 additions and 46 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Dodge/Placement/Instance/Terminal.hs
+1 -2
View File
@@ -51,8 +51,7 @@ putMessageTerminal col =
termButton :: Button
termButton =
Button
{ _btPict = DrawNoButton
, _btPos = 0
{ _btPos = 0
, _btRot = 0
, _btEvent = ButtonAccessTerminal
, _btID = 0