From 5fd4956c8335487abc91c603affd567324eea95c Mon Sep 17 00:00:00 2001 From: Jasper Van der Jeugt Date: Tue, 4 Aug 2020 12:35:11 +0200 Subject: Make it barely usable --- client/src/Client.elm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/client/src/Client.elm b/client/src/Client.elm index 6b65091..f15952e 100644 --- a/client/src/Client.elm +++ b/client/src/Client.elm @@ -49,7 +49,8 @@ viewPlayer player = Html.div [] <| [ Html.text player.name ] ++ (if player.admin then [Html.text " 👑"] else []) ++ - (if player.ready then [Html.text " ✅"] else []) + (if player.ready then [Html.text " ✅"] else []) ++ + [Html.text <| " (" ++ String.fromInt player.points ++ " points)"] view : Model -> List (Html Msg) view model = case model of @@ -62,7 +63,7 @@ view model = case model of [ Html.h1 [] [Html.text "Players"] , Html.ul [] <| List.map (\o -> Html.li [] [viewPlayer o]) - game.view.players + (game.view.me :: game.view.players) , Html.h1 [] [Html.text "You"] , Html.form [ Html.Attributes.action "" -- cgit v1.2.3