Cleanup

2024-09-21 19:06:43 +01:00
parent cb3288db45
commit 241f6fdf10
8 changed files with 17 additions and 33 deletions
@@ -73,7 +73,7 @@ itemBaseName it = case _iyBase $ _itType it of

 showAttachItem :: AttachType -> String
 showAttachItem t = case t of
-    SCROLLATTACH x -> show x
+    ZOOMSCOPE -> "ZOOMSCOPE"
    TARGETATTACH x -> show x
    BULLETSYNTHESIZER -> "BSYNTH"
    ROCKETREMOTESCREEN -> "REMOTE SCREEN"