Cleanup

2024-12-19 23:40:04 +00:00
parent f3cfe8cb5f
commit e1989eaa1e
28 changed files with 285 additions and 300 deletions
@@ -2,7 +2,7 @@ module Dodge.Equipment.Text (eqPosText) where

 import Dodge.Data.Equipment.Misc

-eqPosText :: EquipPosition -> String
+eqPosText :: EquipSite -> String
 eqPosText ep = case ep of
    OnHead -> "HEAD"
    OnChest -> "CHESt"