              from a tag name."}
   re-tag #"([^\s\.#]+)(?:#([^\s\.#]+))?(?:\.([^\s#]+))?")
 
-(def attr-aliases {:class "className"
-                   :for "htmlFor"
-                   :charset "charSet"})
-
 
 ;;; Common utilities
 

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

(defn undash-prop-name [n]
  (or (attr-aliases n)
      (util/dash-to-camel n)))


;;; Props conversion

(def prop-name-cache #js{})

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

    (assert tag (str "Unknown tag: '" hiccup-tag "'"))
    #js{:name tag
        :hasIdClass (or (some? id) (some? class'))
        :id id
        :className class'}))

(defn fn-to-class [f]
