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

Add preliminary list of recipe versions
continuous-integration/drone/pr Build is failing Details

This commit is contained in:
3wc 2023-03-28 00:15:35 -04:00
parent 70307aad9e
commit 57b4db9bb2
1 changed files with 12 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
src/Pages/App_String.elm
View File

@ -271,7 +271,10 @@ viewApp app readme =
[ div [] (Markdown.toHtml Nothing readme)
]
, div [ class "card-footer" ]
[]
[ h5 [] [ text "Versions" ]
, ul [] (
List.map (\version -> li [] [ text (version) ]) app.versions
)]
]
]
@ -316,14 +319,18 @@ featuresDecoder =
]
versionsDecoder : Decode.Decoder (List String)
versionsDecoder =
Decode.keyValuePairs Decode.value
|> Decode.map buildVersions
Decode.list (Decode.keyValuePairs Decode.value)
|> Decode.map buildVersions
buildVersions : List ( String, Decode.Value ) -> List String
buildVersions : List (List ( String, Decode.Value )) -> List String
buildVersions versions =
List.map (\( version, _ ) -> version) versions
List.concatMap (List.map (\( version, _ ) -> version)) versions
appDecoder : Decode.Decoder App