summaryrefslogtreecommitdiff
path: root/elm
diff options
context:
space:
mode:
authorYorhel <git@yorhel.nl>2020-01-03 15:12:47 +0100
committerYorhel <git@yorhel.nl>2020-01-03 15:12:47 +0100
commit8620f71c6180e06164b2b51f930d94acaa439036 (patch)
tree95708936782a2a77bd5346daed4da8a609c43e24 /elm
parentd2fef9e2f1df8318c27651e6d1e8502857a49756 (diff)
ulist: Display platform icons in releases listing
Diffstat (limited to 'elm')
-rw-r--r--elm/Lib/Html.elm3
-rw-r--r--elm/UList/Opt.elm5
2 files changed, 7 insertions, 1 deletions
diff --git a/elm/Lib/Html.elm b/elm/Lib/Html.elm
index 66436073..2e534246 100644
--- a/elm/Lib/Html.elm
+++ b/elm/Lib/Html.elm
@@ -201,5 +201,8 @@ formField lbl cont =
langIcon : String -> Html m
langIcon l = abbr [ class "icons lang", class l, title (Maybe.withDefault "" <| lookup l T.languages) ] [ text " " ]
+platformIcon : String -> Html m
+platformIcon l = abbr [ class "icons", class l, title (Maybe.withDefault "" <| lookup l T.platforms) ] [ text " " ]
+
releaseTypeIcon : String -> Html m
releaseTypeIcon t = abbr [ class ("icons rt"++t), title (Maybe.withDefault "" <| lookup t T.releaseTypes) ] [ text " " ]
diff --git a/elm/UList/Opt.elm b/elm/UList/Opt.elm
index f5ed7303..e05a21d9 100644
--- a/elm/UList/Opt.elm
+++ b/elm/UList/Opt.elm
@@ -214,7 +214,10 @@ view model =
]
]
, td [ class "tco2" ] [ RDate.display model.today nfo.released ]
- , td [ class "tco3" ] <| List.map langIcon nfo.lang ++ [ releaseTypeIcon nfo.rtype ]
+ , td [ class "tco3" ]
+ <| List.map platformIcon nfo.platforms
+ ++ List.map langIcon nfo.lang
+ ++ [ releaseTypeIcon nfo.rtype ]
, td [ class "tco4" ] [ a [ href ("/r"++String.fromInt nfo.id), title nfo.original ] [ text nfo.title ] ]
]