       (when (= data-source :dbpedia)
         (analytics/log-answer (:subject correct-answer) answer-matched?)
         (update-success-rate answer-matched?))
-      
+
       (mark-deselected true)
       (go (<! (timeout 2000))
-          (mark-deselected false)) 
+          (mark-deselected false))
 
       ; Test if the game is over:
       (test-winner new-ownership current-field)

                                     ; TODO: Does first (some) suffice of we need the shortest path?
                                     path (some (partial find-connecting-path (into {} player-fields))
                                                (remove-inner-fields player-fields))]
                                 (when path 
                                   {:player player
                                    :path path})))
        players-fields (->> board

  (dissoc app-state :current-field))

(defn match-answer
  "Mark if the last question was correctly answered or not."
  [matches? app-state]
  (assoc app-state :verdict matches?))

