Use a single place to create values for bool custom fields

This commit is contained in:
eikek
2021-06-10 01:29:46 +02:00
parent 29cfa035f4
commit 7ec0668f03
3 changed files with 17 additions and 11 deletions

View File

@ -1,5 +1,6 @@
module Util.CustomField exposing
( nameOrLabel
( boolValue
, nameOrLabel
, renderValue
, renderValue2
)
@ -12,6 +13,17 @@ import Html.Attributes exposing (..)
import Html.Events exposing (onClick)
{-| This is how the server wants the value to a bool custom field
-}
boolValue : Bool -> String
boolValue b =
if b then
"true"
else
"false"
nameOrLabel : { r | name : String, label : Maybe String } -> String
nameOrLabel fv =
Maybe.withDefault fv.name fv.label