 ;;------------------------------------------------------------------------------
 
 (defn- fetch-tourney-state-success [new-state]
-  ;; TODO: make sure the version is the latest here
-  ;; merge the tournament state with the page state
-  (swap! page-state merge new-state)
-  ;; set the title tag
-  (aset js/document "title" (str (:title new-state) " - Admin")))
+  ;; FIXME: TOTAL HACK RIGHT HERE
+  (when-not (= "schedule" (:active-page @page-state))
+    ;; TODO: make sure the version is the latest here
+    ;; merge the tournament state with the page state
+    (swap! page-state merge new-state)
+    ;; set the title tag
+    (aset js/document "title" (str (:title new-state) " - Admin"))))
 
 (defn- fetch-tourney-state! []
   (fetch-json-as-cljs (tournament-state-url) fetch-tourney-state-success))

    (condp = active-page
      "teams" (TeamsPage teams)
      "schedule" (SchedulePage games)
      :else (GamesList teams games active-page simulated-scoreA simulated-scoreB))
    (Footer)
    (when menu-showing?
      (LeftNavMenu))

;; NOTE: this is a hack for the 2017 tournament
;;       make sure the game-ids are in descending order of how you want the tournament to run

(defn- click-save-schedule []
  (swap! page-state assoc :loading-modal-showing? true
                          :loading-modal-txt saving-txt)
  (save-state!))

(defn- on-change-time-input [game-id js-evt]
  (let [new-txt (aget js-evt "currentTarget" "value")]
    (swap! page-state assoc-in [:games game-id :start-time] new-txt)))
