aboutsummaryrefslogtreecommitdiff
path: root/src/View/Game.elm
diff options
context:
space:
mode:
Diffstat (limited to 'src/View/Game.elm')
-rw-r--r--src/View/Game.elm5
1 files changed, 3 insertions, 2 deletions
diff --git a/src/View/Game.elm b/src/View/Game.elm
index f99369d..2651f8d 100644
--- a/src/View/Game.elm
+++ b/src/View/Game.elm
@@ -144,15 +144,16 @@ renderScore boardSize currentRoundTime rounds score =
{ x = 0.0
, y = boardSize.y / 2 - 35
}
+ scoreText = "L" ++ (toString << currentLevelNumber <| score) ++ " - " ++ (toString score)
in if currentRoundTime < 5000
then
case List.head rounds of
Just round ->
renderText boardSize scorePos (roundView round)
Nothing ->
- renderText boardSize scorePos (toString score)
+ renderText boardSize scorePos scoreText
else
- renderText boardSize scorePos (toString score)
+ renderText boardSize scorePos scoreText
renderText : Vec2 -> Vec2 -> String -> Svg
renderText boardSize pos content =