     (switch-zoom-on-spacebar! current-state animation-subject)
     (zoom-on-pinch! gesture-manager current-state animation-subject)
     (zoom-in-on-tap! gesture-manager current-state animation-subject)
-    (focus-node-on-tap-2! gesture-manager current-state animation-subject)))
+    (focus-node-on-tap! gesture-manager current-state animation-subject)))

                                           width
                                           height
                                           animation-subject))]
    (sync-on-container-size! current-state selector)
    (load-graph "miserables.json"
                (fn [graph]
                  (let [{:keys [nodes links]} graph]

    {:node @closest-node
     :distance (js/Math.sqrt @closest-distance-sq)}))

(defn focus-node-on-tap! [manager current-state animation-observable]
  (let [taps (tap-observable manager)]
    (-> taps
        (suppress-while-animating animation-observable)
