TheAnachronism/docspell
1
0
Fork 0
mirror of https://github.com/TheAnachronism/docspell.git synced 2025-06-23 10:58:26 +00:00
Code Issues Packages Projects Releases Wiki Activity

Externalize strings in detail page

Browse Source
This commit is contained in:
Eike Kettner
2021-04-07 01:09:58 +02:00
parent 1762e7afac
commit 2f678aca17
30 changed files with 554 additions and 254 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
modules/webapp/src/main/elm/Util/Tag.elm
View File

@ -21,14 +21,14 @@ makeDropdownModel =
}
tagSettings : DS.DropdownStyle -> Comp.Dropdown.ViewSettings Tag
tagSettings ds =
tagSettings : String -> DS.DropdownStyle -> Comp.Dropdown.ViewSettings Tag
tagSettings placeholder ds =
{ makeOption = \tag -> { text = tag.name, additional = "" }
, labelColor =
\tag ->
\settings ->
Data.UiSettings.tagColorString2 tag settings
, placeholder = "Choose a tag…"
, placeholder = placeholder
, style = ds
}
@ -41,11 +41,11 @@ makeCatDropdownModel =
}
catSettings : DS.DropdownStyle -> Comp.Dropdown.ViewSettings String
catSettings ds =
catSettings : String -> DS.DropdownStyle -> Comp.Dropdown.ViewSettings String
catSettings placeholder ds =
{ makeOption = \cat -> { text = cat, additional = "" }
, labelColor = \_ -> \_ -> ""
, placeholder = "Choose a tag category…"
, placeholder = placeholder
, style = ds
}