                    :component-will-update start
                    :component-did-mount stop
                    :component-did-update stop})]
-    (fn [props children]
+    (fn []
       [:div
        [:p [:em "render time: " @render-time "ms"]]
-       (into [timed-f props] children)])))
+       [timed-f]])))
 
 (def base-color (atom {:red 130 :green 160 :blue 120}))
 (def ncolors (atom 20))

(def funmap (-> "reagentdemo/news/async.cljs" get-source common/fun-map))
(def src-for (partial common/src-for funmap))

(defn timing-wrapper [{f :component-fn}]
  (let [start-time (atom nil)
        render-time (atom nil)
        now #(.now js/Date)

  (reset! random-colors
          (repeatedly #(-> color tweak-color to-rgb))))

(defn color-choose [color-part]
  [:div.color-slider
   (name color-part) " " (color-part @base-color)
   [:input {:type "range" :min 0 :max 255
