flag inactive goalies in goalieName

2020-01-11 01:46:40 -05:00
parent 461fb5d942
commit 7923827d22
2 changed files with 15 additions and 5 deletions
@@ -51,8 +51,12 @@ goalieDetails g = let
 goalieName :: Goalie -> String
 goalieName g = let

+  prefix = if g^.gActive
+    then ""
+    else "*"
+
  suffix = if g^.gRookie
    then "*"
    else ""

-  in g^.gName ++ suffix
+  in prefix ++ g^.gName ++ suffix