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

Add space after string.

Browse Source
This commit is contained in:
Dillon Kearns 2023-01-19 17:35:15 -08:00
parent 55ca73c5e3
commit e18d8c0fe7
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
examples/end-to-end/script/src/AddForm.elm
View File

@ -10,6 +10,7 @@ import Elm.Annotation
import Elm.Case
import Elm.Declare
import Elm.Let
import Elm.Op
import Gen.BackendTask
import Gen.Basics
import Gen.Debug
@ -193,7 +194,7 @@ formWithFields fields =
(\label field ->
Html.div []
[ Html.label []
[ Html.call_.text label -- TODO concat with ` ++ " "`
[ Html.call_.text (Elm.Op.append label (Elm.string " "))
, field |> Gen.Form.FieldView.inputStyled []
, Elm.apply (Elm.val "errorsView") [ field ]
]