diff --git a/tests/PlayerTest.elm b/tests/PlayerTest.elm
index f6d29cd..614cec6 100644
--- a/tests/PlayerTest.elm
+++ b/tests/PlayerTest.elm
@@ -32,13 +32,9 @@ playerFuzzer =
 
 nameFuzzer : Fuzzer String
 nameFuzzer =
-    let
-        chars =
-            Fuzz.intRange (Char.toCode 'a') (Char.toCode 'c')
-                |> Fuzz.map Char.fromCode
-    in
-    Fuzz.map2 (::) chars (Fuzz.list chars)
-        |> Fuzz.map String.fromList
+    Fuzz.intRange (Char.toCode 'a') (Char.toCode 'c')
+        |> Fuzz.map Char.fromCode
+        |> Fuzz.map String.fromChar
 
 
 decoderTest : Test