Make it barely usable

1 files 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 ""