 
     ; Merge in the updated data into the player structure.
     ; Also update the game id, so we know which players are in the current game.
-    (swap! players update-in [pid] merge player-data {:game @game-count :pid pid})
+    (swap! players update-in [pid] merge player-data
+      {:game @current-round-id :pid pid})
 
     ; Call score update events.
     (if (contains? player-data :score)


(declare go-go-next-game-countdown!)

(def game-count
  "Number of games started since server started (used to identify games)"
  (atom 0))


  (atom {}))

(defn rank-players
  "Get players for the given game sorted by rank."
  [game-id]
  (->> (vals @players)
       (filter #(= game-id (:game %)))
       (sort-by :score)
       reverse))

(defn go-go-countdown!
  "Start the countdown"
