ugueseFormMessage (MsgInvalidEntry t) = "Entrada inválida: " `mappend` t
port
portugueseFormMessage (MsgInvalidEntry t) = "Entrada inválida: " `mappend` t
portugueseFormMessage (MsgInvalidEntry t) = "Entrada inválida: " `mappend` t