       (SwissResultsTable simulated-results)]))
 
 ;; TODO: calculate this from the games data instead of hard-coding
-(def last-swiss-round-num 4)
+(def last-swiss-round-num 5)
 
 (rum/defc SwissPanel < rum/static
   [teams all-games swiss-round simulated-scoreA simulated-scoreB]

;; Admin App
;;------------------------------------------------------------------------------

(def page-titles
  "Mapping of page-ids to titles."
  {"swiss-round-1" "Swiss Round 1"
   "swiss-round-2" "Swiss Round 2"
   "swiss-round-3" "Swiss Round 3"
   "swiss-round-4" "Swiss Round 4"
   "swiss-round-5" "Swiss Round 5"
   "bracket-play" "Bracket Play"
   "all-games" "All Games"})

(rum/defc AdminApp < rum/static
  [{:keys [active-page
           edit-game-modal-game

                     (not= swiss-round last-swiss-round-num))
            [:p.msg
              (str "This round is over. Match-ups for the next round can be "
                   "found on the \"Swiss Round " next-swiss-round "\" tab.")])])]))

;;------------------------------------------------------------------------------
;; Single Game Row
