           (update-score! report-match other other-score score))))))
 
 (defn handle-player-update [report-match path player]
-  (debug "handle update" path player)
-  (om/update! @report-match path player))
+  (om/update! report-match path player))
 
 (defn report-match-component [{:keys [active-players report-match] :as app} owner]
   (reify

                                          :type "date"
                                          :value formated-date}]]]]))

(defn other-team [this-team]
  (let [difference (disj #{:team1 :team2} this-team)]
    (when (= 1 (count difference))
      (first difference))))

(defn valid-score? [this other]
  (:team1score (vm/validate-scores [this other])))


        (loc/set-location app (:id v)))
      (.back js/history))))

(defn selected-players [team other-team]
  (let [players (for [t      [team other-team]
                      player [:player1 :player2]]
                  (get t player))]
    (->> players
         (filter identity)
         set)))

(defn team-score-component [team owner {:keys [score-ch]}]
  (reify
