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

Use externalized strings for edit label

Browse Source
This commit is contained in:
Eike Kettner
2021-04-14 00:11:10 +02:00
parent 9070f69c93
commit 9d6e26efb4
19 changed files with 59 additions and 58 deletions
Download Patch File Download Diff File Expand all files Collapse all files

26
modules/webapp/src/main/elm/Comp/Basic.elm
View File

@ -1,7 +1,6 @@
module Comp.Basic exposing
( editLinkLabel
, editLinkTableCell
, editLinkTableCell2
, genericButton
, horizontalDivider
, inputRequired
@ -17,7 +16,6 @@ module Comp.Basic exposing
import Html exposing (..)
import Html.Attributes exposing (..)
import Html.Events exposing (onClick)
import Messages.Basics
import Styles as S
@ -192,32 +190,20 @@ loadingDimmer cfg =
]
editLinkLabel : msg -> Html msg
editLinkLabel =
editLinkLabel2 Messages.Basics.gb
editLinkLabel2 : Messages.Basics.Texts -> msg -> Html msg
editLinkLabel2 texts click =
editLinkLabel : String -> msg -> Html msg
editLinkLabel label click =
linkLabel
{ label = texts.edit
{ label = label
, icon = "fa fa-edit"
, handler = click
, disabled = False
}
editLinkTableCell : msg -> Html msg
editLinkTableCell m =
editLinkTableCell : String -> msg -> Html msg
editLinkTableCell label m =
td [ class S.editLinkTableCellStyle ]
[ editLinkLabel2 Messages.Basics.gb m
]
editLinkTableCell2 : Messages.Basics.Texts -> msg -> Html msg
editLinkTableCell2 texts m =
td [ class S.editLinkTableCellStyle ]
[ editLinkLabel2 texts m
[ editLinkLabel label m
]