 ;; tricky. The upside is that we don't have to do any allocations.
 
 (defn- args-of [C]
-  (-> C (aget "props") .-cljsArgs)
-  #_(-> C .-props .-cljsArgs))
+  (-> C (aget "props") .-cljsArgs))
 
 (defn- props-in-args [args]
   (let [p (nth args 1 nil)]

;;; Function wrapping

(defn- do-render [C f]
  (let [res (f (cljs-props C) C (aget "state" C) #_(.-state C))
        conv (if (vector? res)
               (tmpl/as-component res)
               (if (fn? res)

    f))

(defn- get-wrapper [key f name]
  (let [wrap (custom-wrapper key f)]
    (when (and wrap f)
      (assert (fn? f)
