aboutsummaryrefslogtreecommitdiff
path: root/src/Model/Edition/NameEdition.elm
diff options
context:
space:
mode:
authorJoris Guyonvarch2015-03-22 17:13:04 +0100
committerJoris Guyonvarch2015-03-22 17:13:04 +0100
commitb3076f37700291221ededbaf996a065b006cf42d (patch)
tree26535eb8756329565529f2c5383701aa41c06c17 /src/Model/Edition/NameEdition.elm
parente7237e9f2a01197890d85b6ecc223e4022630cb8 (diff)
Do not add more than one space when editing name
Diffstat (limited to 'src/Model/Edition/NameEdition.elm')
-rw-r--r--src/Model/Edition/NameEdition.elm5
1 files changed, 4 insertions, 1 deletions
diff --git a/src/Model/Edition/NameEdition.elm b/src/Model/Edition/NameEdition.elm
index 18224ea..89e5441 100644
--- a/src/Model/Edition/NameEdition.elm
+++ b/src/Model/Edition/NameEdition.elm
@@ -12,4 +12,7 @@ keyCodeToChar : KeyCode -> Maybe Char
keyCodeToChar = Just << Char.fromCode
renderNameEdition : List Char -> String
-renderNameEdition = String.fromList << List.reverse
+renderNameEdition chars =
+ chars
+ |> List.reverse
+ |> String.fromList