From e43df972c82c8b5926f76658c7588074e6a15069 Mon Sep 17 00:00:00 2001
From: Joris
Date: Sat, 14 Nov 2015 17:10:20 +0100
Subject: Display the game at fullscreen

---
 src/Update/CloudUpdate.elm | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

(limited to 'src/Update')

diff --git a/src/Update/CloudUpdate.elm b/src/Update/CloudUpdate.elm
index ecbce8b..f509a5f 100644
--- a/src/Update/CloudUpdate.elm
+++ b/src/Update/CloudUpdate.elm
@@ -51,10 +51,9 @@ cloudUpdate time boardSize seed player {points, spawn, lastSpawn} =
 
 presentPoints : Float -> Vec2 -> List Point -> List Point
 presentPoints time boardSize points =
-  let isPresent point = (distance (pointMove point time) originVec) < (pointAwayDist boardSize)
+  let isPresent point = (distance (pointMove point time) originVec) < (pointSpawnDist boardSize)
   in  List.filter isPresent points
 
-
 getNewPoint : Float -> Vec2 -> Seed -> (Point, Seed)
 getNewPoint time boardSize seed =
   let (initPos, seed') = pointInitPos boardSize seed
@@ -74,7 +73,7 @@ pointInitPos : Vec2 -> Seed -> (Vec2, Seed)
 pointInitPos boardSize seed =
   let (rand, seed') = generate floatGen seed
       angle = rand * (degrees 360)
-      dist = (boardDiagonal boardSize) * 3 / 5
+      dist = pointSpawnDist boardSize
   in  (polarToCartesian angle dist, seed')
 
 pointDestination : Vec2 -> Seed -> (Vec2, Seed)
-- 
cgit v1.2.3