     x
     (if-let [s (obj-get prop-name-cache (name x))]
       s
-      (aset prop-name-cache (name x) (undash-prop-name x)))))
+      (aset prop-name-cache (name x)
+            (util/dash-to-camel x)))))
 
 (defn convert-prop-value [x]
   (cond (string? x) x

        :else (to-js-val x)))

(defn set-id-class [props id-class]
  (when-some [id (.' id-class :idName)]
    (let [pid (.' props :id)]
      (.! props :id (if (some? pid) pid id))))
  (when-some [class (.' id-class :className)]

   (ifn? v) (fn [& args] (apply v args))
   :else v))


;;; Props conversion

(def prop-name-cache #js{:class "className"
                         :for "htmlFor"
                         :charset "charSet"})

(defn obj-get [o k]
  (when (.hasOwnProperty o k)
