module Edition.Model.Name exposing
  ( keyCodeToChar
  , renderNameEdition
  )

import Char
import String
import List

import Model.Keyboard exposing (KeyCode)

keyCodeToChar : KeyCode -> Maybe Char
keyCodeToChar = Just << Char.fromCode

renderNameEdition : List Char -> String
renderNameEdition chars =
  chars
    |> List.reverse
    |> String.fromList