ELMで URL Encode

ELMで全角データをPostするため、Encodeが必要になりいろいろ調べた結果、percentEncodeを使うとよいことがわかる。Maybe Stringのままで変換する必要があるので、
import Url
urlEncode:Maybe String -> Maybe String
urlEncode ma =
    case ma of
     Nothing -> Just ""
     Just a -> Just (Url.percentEncode a)
このような関数を作って Maybe Stringに適用できるようしてみたら、うまくいく。