mirror of
https://github.com/TheAnachronism/docspell.git
synced 2025-06-23 10:58:26 +00:00
Show custom field values in item detail header
This commit is contained in:
@ -7,6 +7,8 @@ module Data.Icons exposing
|
||||
, correspondentIcon
|
||||
, customField
|
||||
, customFieldIcon
|
||||
, customFieldType
|
||||
, customFieldTypeIcon
|
||||
, date
|
||||
, dateIcon
|
||||
, direction
|
||||
@ -32,10 +34,36 @@ module Data.Icons exposing
|
||||
, tagsIcon
|
||||
)
|
||||
|
||||
import Data.CustomFieldType exposing (CustomFieldType)
|
||||
import Html exposing (Html, i)
|
||||
import Html.Attributes exposing (class)
|
||||
|
||||
|
||||
customFieldType : CustomFieldType -> String
|
||||
customFieldType ftype =
|
||||
case ftype of
|
||||
Data.CustomFieldType.Text ->
|
||||
"pen icon"
|
||||
|
||||
Data.CustomFieldType.Numeric ->
|
||||
"hashtag icon"
|
||||
|
||||
Data.CustomFieldType.Date ->
|
||||
"calendar icon"
|
||||
|
||||
Data.CustomFieldType.Boolean ->
|
||||
"question icon"
|
||||
|
||||
Data.CustomFieldType.Money ->
|
||||
"money bill icon"
|
||||
|
||||
|
||||
customFieldTypeIcon : String -> CustomFieldType -> Html msg
|
||||
customFieldTypeIcon classes ftype =
|
||||
i [ class (customFieldType ftype ++ " " ++ classes) ]
|
||||
[]
|
||||
|
||||
|
||||
customField : String
|
||||
customField =
|
||||
"highlighter icon"
|
||||
|
Reference in New Issue
Block a user