             (<!! status-spy)
             (<!! status-spy)
 
-            (extensions/write-place sync peer-node-a payload-node-a-2)
+            (extensions/write-place sync peer-node-a {:pulse pulse-node-a :payload payload-node-a-2})
             (extensions/on-change sync payload-node-a-2 #(>!! sync-spy-a %))
 
-            (extensions/write-place sync peer-node-b payload-node-b-2)
+            (extensions/write-place sync peer-node-b {:pulse pulse-node-b :payload payload-node-b-2})
             (extensions/on-change sync payload-node-b-2 #(>!! sync-spy-b %))
 
             (extensions/touch-place sync (:completion (:nodes payload-a)))

    (fn [coordinator sync log]
      (let [n 4
            peers (take n (repeatedly (fn [] (extensions/create sync :peer))))
            payloads (take n (repeatedly (fn [] (extensions/create sync :payload))))
            sync-spies (take n (repeatedly (fn [] (chan 1))))
            

        (tap (:ack-mult coordinator) ack-ch-spy)
        (tap (:offer-mult coordinator) offer-ch-spy)

        (extensions/write-place sync peer-node-a {:pulse pulse-node-a :payload payload-node-a-1})
        (extensions/on-change sync payload-node-a-1 #(>!! sync-spy-a %))

        (extensions/write-place sync peer-node-b {:pulse pulse-node-b :payload payload-node-b-1})
        (extensions/on-change sync payload-node-b-1 #(>!! sync-spy-b %))

        (>!! (:born-peer-ch-head coordinator) peer-node-a)
