Multi-line fix

This commit is contained in:
iko 2023-08-25 19:02:31 +03:00
parent 87c1f6b60b
commit 4dab0de5ca
Signed by untrusted user: iko
GPG Key ID: 82C257048D1026F2

View File

@ -112,6 +112,7 @@ main =
, Font.typeface "Segoe UI Emoji" , Font.typeface "Segoe UI Emoji"
, Font.typeface "Segoe UI Symbol" , Font.typeface "Segoe UI Symbol"
] ]
, clipX
] ]
] ]
} }
@ -159,8 +160,8 @@ view model =
] ]
Just _ -> Just _ ->
column [ width fill, spacing 16 ] column [ width (minimum 0 fill), spacing 16 ]
[ row [ spacing 16, width fill ] [ row [ spacing 16, width (minimum 0 fill) ]
[ searchView model |> el [ padding 8 ] [ searchView model |> el [ padding 8 ]
, model.engines , model.engines
|> List.filter (\( _, state ) -> state /= Failed) |> List.filter (\( _, state ) -> state /= Failed)
@ -205,7 +206,7 @@ view model =
, padding 16 , padding 16
] ]
] ]
, Keyed.column [ width fill, padding 8 ] , Keyed.column [ width (minimum 0 fill), padding 8 ]
(model.searchResults (model.searchResults
|> List.filter |> List.filter
(\{ engines } -> (\{ engines } ->
@ -220,7 +221,7 @@ view model =
( link ( link
, column , column
[ spacing 4 [ spacing 4
, width fill , width (minimum 0 fill)
, pointer , pointer
, alpha , alpha
(Animator.move (Animator.move
@ -250,17 +251,14 @@ view model =
|> htmlAttribute |> htmlAttribute
, Html.Attributes.style "position" "absolute" |> htmlAttribute , Html.Attributes.style "position" "absolute" |> htmlAttribute
] ]
[ [ text title ] [ text title
|> paragraph |> el
[ Font.size 16 [ Font.size 16
, width fill , width fill
, Html.Attributes.style "text-overflow" "ellipsis" |> htmlAttribute
] ]
, [ text link ] , text link
|> paragraph |> el
[ Font.size 12 [ Font.size 12
, Html.Attributes.style "text-overflow" "ellipsis" |> htmlAttribute
, width fill
, Font.color (rgb 0.7 0.7 0.7) , Font.color (rgb 0.7 0.7 0.7)
] ]
] ]