dillonkearns/elm-pages-v3-beta
1
1
Fork 0
mirror of https://github.com/dillonkearns/elm-pages-v3-beta.git synced 2024-11-25 09:21:57 +03:00
Code Issues Packages Projects Releases Wiki Activity

Add constraints to only allow formatting input options to be applied to text inputs.

Browse Source
This commit is contained in:
Dillon Kearns 2022-01-15 19:03:13 -08:00
parent 4e78fceaef
commit 6de253d91e
2 changed files with 7 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
docs.json
View File

File diff suppressed because one or more lines are too long

11
src/Form.elm
View File

@ -719,6 +719,7 @@ text :
(Maybe String) (Maybe String)
view view
{ required : () { required : ()
, plainText : ()
, wasMapped : No , wasMapped : No
} }
text name toHtmlFn = text name toHtmlFn =
@ -1269,31 +1270,31 @@ required missingError (Field field) =
{-| -} {-| -}
telephone : Field error value view constraints -> Field error value view constraints telephone : Field error value view { constraints | plainText : () } -> Field error value view constraints
telephone (Field field) = telephone (Field field) =
Field { field | type_ = "tel" } Field { field | type_ = "tel" }
{-| -} {-| -}
search : Field error value view constraints -> Field error value view constraints search : Field error value view { constraints | plainText : () } -> Field error value view constraints
search (Field field) = search (Field field) =
Field { field | type_ = "search" } Field { field | type_ = "search" }
{-| -} {-| -}
password : Field error value view constraints -> Field error value view constraints password : Field error value view { constraints | plainText : () } -> Field error value view constraints
password (Field field) = password (Field field) =
Field { field | type_ = "password" } Field { field | type_ = "password" }
{-| -} {-| -}
email : Field error value view constraints -> Field error value view constraints email : Field error value view { constraints | plainText : () } -> Field error value view constraints
email (Field field) = email (Field field) =
Field { field | type_ = "email" } Field { field | type_ = "email" }
{-| -} {-| -}
url : Field error value view constraints -> Field error value view constraints url : Field error value view { constraints | plainText : () } -> Field error value view constraints
url (Field field) = url (Field field) =
Field { field | type_ = "url" } Field { field | type_ = "url" }