coop-cloud/recipes.coopcloud.tech
coop-cloud
/
recipes.coopcloud.tech
1
2
Fork 0
Code Issues 6 Pull Requests Projects Releases Wiki Activity

Use string-extra.ellipsis to truncate descriptions
continuous-integration/drone/push Build is passing Details

This commit is contained in:
3wc 2021-07-20 13:50:30 +02:00
parent f53b4555cf
commit 468f7e1055
2 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
elm.json
View File

@ -14,6 +14,7 @@
"elm/regex": "1.0.0",
"elm/url": "1.0.0",
"elm-community/json-extra": "4.3.0",
"elm-community/string-extra": "4.0.1",
"pablohirafuji/elm-markdown": "2.0.5"
},
"indirect": {

3
src/Pages/Top.elm
View File

@ -11,6 +11,7 @@ import Spa.Document exposing (Document)
import Spa.Generated.Route as Route
import Spa.Page as Page exposing (Page)
import Spa.Url as Url exposing (Url)
import String.Extra exposing (ellipsis)
import Util exposing (Direction(..), andThen, by)
@ -183,7 +184,7 @@ viewApp app =
, div [ class "card-body" ]
[ h5 [ class "card-title" ]
[ a [ href app_href ] [ text app.name ] ]
, p [] [ text (withDefault "" app.description) ]
, p [] [ text (ellipsis 100 (withDefault "" app.description)) ]
, repository_link
, website_link
, a [ class "card-link", href app_href ]