Display full attachment name in title tooltip

This commit is contained in:
Eike Kettner 2020-02-23 14:36:19 +01:00
parent 1f431c3222
commit be8eacdbe9

View File

@ -1134,15 +1134,16 @@ renderAttachmentsTabMenu model =
div [ class "ui top attached tabular menu" ] div [ class "ui top attached tabular menu" ]
(List.indexedMap (List.indexedMap
(\pos -> (\pos ->
\a -> \el ->
div a
[ classList [ classList
[ ( "item", True ) [ ( "item", True )
, ( "active", pos == model.visibleAttach ) , ( "active", pos == model.visibleAttach )
] ]
, title (Maybe.withDefault "No Name" el.name)
, onClick (SetActiveAttachment pos) , onClick (SetActiveAttachment pos)
] ]
[ Maybe.map (Util.String.ellipsis 20) a.name [ Maybe.map (Util.String.ellipsis 20) el.name
|> Maybe.withDefault "No Name" |> Maybe.withDefault "No Name"
|> text |> text
] ]